浏览代码

Fix code typo in commit 2508dfa6

Bastien 5 年之前
父节点
当前提交
fe46c02afa
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-attach.el

+ 1 - 1
lisp/org-attach.el

@@ -293,7 +293,7 @@ Shows a list of commands and prompts for another key to execute a command."
 			     (concat (mapcar #'caar org-attach-commands))))
 		key)
 	    (message msg)
-	    (while (and (setq key (read-char-exclusive prompt))
+	    (while (and (setq key (read-char-exclusive))
 		        (memq key '(14 16 22 134217846)))
 	      (org-scroll key t)))
 	  (and (get-buffer "*Org Attach*") (kill-buffer "*Org Attach*"))))