Emacs快速定位到(自定义目录)

Emacs Lisp Code:

;;定义变量
(defconst my-projects-path "~/My-Projects" "My projects dir")

;;定义函数
(defun goto-my-projects-dir ()
  (interactive)
  (dired my-projects-path))

;;定义快捷键
(define-key-list
  global-map
  `(("C-x G p" goto-my-projects-dir))))

有需要的童鞋拿走吧,对Emacs感兴趣的朋友可以互相分享Emacs心得.