Skip to content

Latest commit

 

History

History
28 lines (24 loc) · 1.19 KB

starter-kit-registers.org

File metadata and controls

28 lines (24 loc) · 1.19 KB
Raw

Starter Kit Registers

This is part of the Emacs Starter Kit.

Starter Kit Registers

Registers allow you to jump to a file or other location quickly. Use C-x r j followed by the letter of the register (i for init.el, r for this file) to jump to it.

You should add registers here for the files you edit most often.

(dolist
    (r `((?i (file . ,(concat starter-kit-dir "init.el")))
         (?I (file . ,(let* ((user user-login-name)
                             (org (expand-file-name (concat user ".org") starter-kit-dir))
                             (el  (expand-file-name (concat user ".el") starter-kit-dir))
                             (dir (expand-file-name user starter-kit-dir)))
                        (cond
                         ((file-exists-p org) org)
                         ((file-exists-p el)  el)
                         (t dir)))))
         (?s (file . ,(concat starter-kit-dir "starter-kit.org")))
         (?r (file . ,(concat starter-kit-dir "starter-kit-registers.org")))))
  (set-register (car r) (cadr r)))