diff --git a/.emacs.d/init.el b/.emacs.d/init.el index fd71507..4665a40 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -3851,12 +3851,14 @@ Returns ( . ) or nil." (general-nmap "~" 'eshell)) (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 :infix "c" "" '(: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")) (with-eval-after-load 'tramp (add-to-list 'tramp-methods @@ -3886,13 +3888,10 @@ Returns ( . ) or nil." (shell-command-to-string "yadm ls-files $HOME --full-name") "\n"))))) (general-define-key - "C-c f" (my/command-in-persp - "yadm file" "conf" 1 - (my/open-yadm-file))) + "C-c f" '(my/open-yadm-file :wk "yadm file")) + (my-leader-def - "cf" (my/command-in-persp - "yadm file" "conf" 1 - (my/open-yadm-file))) + "cf" '(my/open-yadm-file :wk "yadm file")) (unless (or my/is-termux my/remote-server) (load-file (expand-file-name "mail.el" user-emacs-directory))) diff --git a/Emacs.org b/Emacs.org index f64b6db..c3c4520 100644 --- a/Emacs.org +++ b/Emacs.org @@ -1,6 +1,6 @@ #+PROPERTY: header-args :mkdirp yes #+PROPERTY: header-args:bash :tangle-mode (identity #o755) :comments link :shebang "#!/usr/bin/env bash" -#+PROPERTY: header-args:emacs-lisp :tangle ~/.emacs.d/init.el :mkdirp yes :eval never-export :exports none +#+PROPERTY: header-args:emacs-lisp :tangle ~/.emacs.d/init.el :mkdirp yes :eval never-export :exports both #+TODO: CHECK(s) | OFF(o) #+TITLE: Emacs config #+OPTIONS: broken-links:auto h:6 toc:nil