Config: add init-org-refile.el , fix dirvish quick access path

lisp/init-dired.el

@@ -37,19 +37,22 @@
   (setq dirvish-default-layout '(1 0.15 0.45))
   :custom
   (dirvish-quick-access-entries
-   (when *is-windows*
+   (cond
+    (*is-windows*
      '(("h" "~/"                          "Home")
        ("e" "~/.emacs.d/")
        ("p" "c:/Users/gaozh/Pictures/Screenshots/" "Pictures")
        ("d" "f:/下载25-2-10/" "Download")
        ("v" "f:/luping26-1-11/" "Videos")
        ("n" "h:/emacs/my-org-note/" "Notes")))
-    (when *is-mac*
+    (*is-mac*
      '(("h" "~/"                          "Home")
-      ("e" "~/.emacs.d/")
-      ("p" "~/Pictures/" "Pictures")
-      ("d" "~/Downloads/" "Download")
-      ("v" "~/Movies/" "Videos")))))
+       ("e" "~/.emacs.d/")
+       ("p" "~/Pictures/" "Pictures")
+       ("d" "~/Downloads/" "Download")
+       ("v" "~/Movies/" "Videos")
+       ("n" "~/org/my-org-note/")))
+    (t nil))))
 
 (use-package trashed
   :commands (trashed)