move project-switch-project override into init.el : not about um
This commit is contained in:
parent
05bece8b56
commit
859b4a222f
1 changed files with 0 additions and 19 deletions
19
elisp/um.el
19
elisp/um.el
|
|
@ -159,25 +159,6 @@ Since journal/ is the origin and other projects shadow it.
|
||||||
(funcall origfunc))
|
(funcall origfunc))
|
||||||
))
|
))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
||||||
;; C-x p p
|
|
||||||
|
|
||||||
;;;###autoload
|
|
||||||
(defun um-project-find-meta ()
|
|
||||||
(interactive)
|
|
||||||
;; this works because `project-switch-project' overrides the dir:
|
|
||||||
(find-file (expand-file-name "*meta.md" (caddr (project-current))) t)
|
|
||||||
)
|
|
||||||
|
|
||||||
;; overwrite
|
|
||||||
(setq project-switch-commands
|
|
||||||
'(
|
|
||||||
(um-project-find-meta "open meta" "m")
|
|
||||||
(project-dired "dired")
|
|
||||||
(project-find-file "find file")
|
|
||||||
(project-find-regexp "find regexp")
|
|
||||||
))
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; tags
|
;; tags
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue