浏览代码

Merge branch 'bugfix'

Ihor Radchenko 3 年之前
父节点
当前提交
7e78f664b2
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-mouse.el

+ 1 - 1
lisp/org-mouse.el

@@ -295,7 +295,7 @@ nor a function, elements of KEYWORDS are used directly."
 	      ((functionp itemformat) (funcall itemformat keyword))
 	      ((stringp itemformat) (format itemformat keyword))
 	      (t keyword))
-	     (list 'funcall function keyword)
+	     `(funcall #',function ,keyword)
 	     :style (cond
 		     ((null selected) t)
 		     ((functionp selected) 'toggle)