From 4c98cfe9ac363948087307020b2d337920ee5a8a Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Wed, 23 Dec 2015 14:49:45 +0100
Subject: Emacs: Don’t use find-file in tangle-init

---
 tag-emacs/emacs.d/init.org | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'tag-emacs')

diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index d3fcba5e..138d1f03 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -2471,9 +2471,8 @@ the =org=-document after changes.
           ;; Avoid running hooks when tangling.
           (let ((prog-mode-hook nil)
                 (dest (concat user-emacs-directory "init.el")))
-            (find-file ,(buffer-file-name))
             (require 'ob-tangle)
-            (org-babel-tangle nil dest)
+            (org-babel-tangle-file ,(buffer-file-name) dest)
             (if (byte-compile-file dest)
                 dest
               (with-current-buffer byte-compile-log-buffer
-- 
cgit 1.4.1