浏览代码

org-macro: Small refactoring

* lisp/org-macro.el (org-macro-initialize-templates): Remove spurious
  lambda funcall.
Nicolas Goaziou 10 年之前
父节点
当前提交
2f58e3c011
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      lisp/org-macro.el

+ 2 - 2
lisp/org-macro.el

@@ -125,12 +125,12 @@ function installs the following ones: \"property\",
 	      (if old-template (setcdr old-template (cdr cell))
 		(push cell templates))))))
     ;; Install hard-coded macros.
-    (mapc (lambda (cell) (funcall update-templates cell))
+    (mapc update-templates
 	  (list (cons "property" "(eval (org-entry-get nil \"$1\" 'selective))")
 		(cons "time" "(eval (format-time-string \"$1\"))")))
     (let ((visited-file (buffer-file-name (buffer-base-buffer))))
       (when (and visited-file (file-exists-p visited-file))
-	(mapc (lambda (cell) (funcall update-templates cell))
+	(mapc update-templates
 	      (list (cons "input-file" (file-name-nondirectory visited-file))
 		    (cons "modification-time"
 			  (format "(eval (format-time-string \"$1\" '%s))"