diff options
| -rw-r--r-- | tag-emacs/emacs.d/init.org | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org index 182bf8f8..90af12aa 100644 --- a/tag-emacs/emacs.d/init.org +++ b/tag-emacs/emacs.d/init.org @@ -2431,11 +2431,11 @@ the =org=-document after changes. (message "Tangling init") ;; Avoid running hooks when tangling. (let ((prog-mode-hook nil) - (dest (concat user-emacs-directory "init.el"))) + (dest (expand-file-name "init.el" user-emacs-directory))) (require 'ob-tangle) (org-babel-tangle-file (buffer-file-name) dest) (if (byte-compile-file dest) - dest + (byte-compile-dest-file dest) (with-current-buffer byte-compile-log-buffer (buffer-string)))))) @@ -2450,11 +2450,11 @@ the =org=-document after changes. `(lambda () ;; Avoid running hooks when tangling. (let ((prog-mode-hook nil) - (dest (concat user-emacs-directory "init.el"))) + (dest (expand-file-name "init.el" user-emacs-directory))) (require 'ob-tangle) (org-babel-tangle-file ,(buffer-file-name) dest) (if (byte-compile-file dest) - dest + (byte-compile-dest-file dest) (with-current-buffer byte-compile-log-buffer (buffer-string))))) (lambda (result) |