diff options
author | Kjetil Orbekk <kj@orbekk.com> | 2023-03-16 09:52:30 -0400 |
---|---|---|
committer | Kjetil Orbekk <kj@orbekk.com> | 2023-03-16 09:53:00 -0400 |
commit | 6d71434adc6e7076fa54f7db1a1fbc1958ca4375 (patch) | |
tree | 847c6da5e75a69d69fbeedb1499a1ded2fb48ae7 | |
parent | b469d3ad43e197b53204b35817a914df431b187e (diff) |
Update config
-rw-r--r-- | emacs/.config/emacs-kj/init.el | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/emacs/.config/emacs-kj/init.el b/emacs/.config/emacs-kj/init.el index f764fb3..5ea8cc2 100644 --- a/emacs/.config/emacs-kj/init.el +++ b/emacs/.config/emacs-kj/init.el @@ -737,12 +737,15 @@ (expand-file-name "lisp" user-emacs-directory))) (require module)) -;; Experimental -(defun find-file-keeping-default-directory (filename) - (let ((dir default-directory)) - (with-current-buffer (find-file filename) - (setq default-directory dir)))) -(define-key embark-file-map "@" 'find-file-keeping-default-directory) +(use-package embark + :config + + ;; Experimental + (defun find-file-keeping-default-directory (filename) + (let ((dir default-directory)) + (with-current-buffer (find-file filename) + (setq default-directory dir)))) + (define-key embark-file-map "@" 'find-file-keeping-default-directory)) ;; Restore gc. (setq gc-cons-threshold (* 16 1024 1024)) |