sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-11 11:43:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat(emacs): turn off designated perspectives for dotfiles commands

Browse source
This commit is contained in:
Pavel Korytov 2022-01-01 17:58:21 +03:00
parent ba38d54cf6
commit 135b3419e4
1 changed files with 7 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
Emacs.org
View file

@ -5621,12 +5621,14 @@ A bunch of functions for managing dotfiles with yadm.
*** Open Emacs config *** Open Emacs config
#+begin_src emacs-lisp #+begin_src emacs-lisp
(general-define-key (general-define-key
"C-c c" (my/command-in-persp "Emacs.org" "conf" 1 (find-file "~/Emacs.org"))) ;; "C-c c" (my/command-in-persp "Emacs.org" "conf" 1 (find-file "~/Emacs.org"))
"C-c c" `(,(lambda () (interactive) (find-file "~/Emacs.org")) :wk "Emacs.org"))
(my-leader-def (my-leader-def
:infix "c" :infix "c"
"" '(:which-key "configuration") "" '(:which-key "configuration")
"c" (my/command-in-persp "Emacs.org" "conf" 1 (find-file "~/Emacs.org"))) ;; "c" (my/command-in-persp "Emacs.org" "conf" 1 (find-file "~/Emacs.org"))
"c" `(,(lambda () (interactive) (find-file "~/Emacs.org")) :wk "Emacs.org"))
#+end_src #+end_src
*** Open Magit for yadm *** Open Magit for yadm
Idea: Idea:
@ -5666,13 +5668,10 @@ Open a file managed by yadm.
(shell-command-to-string "yadm ls-files $HOME --full-name") "\n"))))) (shell-command-to-string "yadm ls-files $HOME --full-name") "\n")))))
(general-define-key (general-define-key
"C-c f" (my/command-in-persp "C-c f" '(my/open-yadm-file :wk "yadm file"))
"yadm file" "conf" 1
(my/open-yadm-file)))
(my-leader-def (my-leader-def
"cf" (my/command-in-persp "cf" '(my/open-yadm-file :wk "yadm file"))
"yadm file" "conf" 1
(my/open-yadm-file)))
#+end_src #+end_src
** Internet & Multimedia ** Internet & Multimedia
*** Notmuch *** Notmuch