From a34431f6ea57a361020660f83fcbcc41c81dc4b6 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Sun, 10 Dec 2017 17:11:24 +0100
Subject: [PATCH] org-tempo: Tiny refactoring

* lisp/org-tempo.el (org-tempo--include-file): Tiny refactoring.
---
 lisp/org-tempo.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/org-tempo.el b/lisp/org-tempo.el
index 6f823ba1f..6c24b2b19 100644
--- a/lisp/org-tempo.el
+++ b/lisp/org-tempo.el
@@ -126,12 +126,13 @@ Goes through `org-structure-template-alist' and
 
 (defun org-tempo--include-file ()
   "Ask for file name and take care of quit"
-  (let* ((inhibit-quit t))
+  (let ((inhibit-quit t))
     (unless (with-local-quit
 	      (prog1 t
 		(insert
-		 (format "#+include: \"%s\" " (file-relative-name
-  				    (read-file-name "Include file: "))))))
+		 (format "#+include: %S "
+			 (file-relative-name
+			  (read-file-name "Include file: "))))))
       (insert "<I")
       (setq quit-flag nil))))
 
@@ -156,9 +157,8 @@ Goes through `org-structure-template-alist' and
 	  'tempo-complete-tag)
 
 ;; Enable Org Tempo in all open Org buffers.
-(mapc (lambda (buf) (with-current-buffer buf
-		 (when (eq major-mode 'org-mode) (org-tempo-setup))))
-      (buffer-list))
+(dolist (b (org-buffer-list))
+  (with-current-buffer b (org-tempo-setup)))
 
 (eval-after-load 'org
   '(org-tempo-add-templates))