diff --git a/Emacs.org b/Emacs.org index 0f27905..e01eb77 100644 --- a/Emacs.org +++ b/Emacs.org @@ -612,15 +612,12 @@ This snippet adds a hook to =org-mode= buffers so that =efs/org-babel-tangle-con #+begin_src emacs-lisp - ;; Automatically tangle our Emacs.org config file when we save it - (defun efs/org-babel-tangle-config () - (when (string-equal (file-name-directory (buffer-file-name)) - (expand-file-name user-emacs-directory)) - ;; Dynamic scoping to the rescue - (let ((org-confirm-babel-evaluate nil)) - (org-babel-tangle)))) - - (add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook #'efs/org-babel-tangle-config))) + ;; Automatically tangle any org file in our emacs directory when we save it. + (defun my/org-babel-tangle-no-confirm () + (let ((org-confirm-babel-evaluate nil)) (org-babel-tangle))) + (add-hook 'org-mode-hook (lambda () + (when (string-equal (file-name-directory (buffer-file-name)) (expand-file-name user-emacs-directory)) + (add-hook 'after-save-hook 'my/org-babel-tangle-no-confirm nil t))) #+end_src