mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-26 07:33:39 +00:00
Code

org-mac-link: Do not quote lambdas

Browse Source 
* contrib/lisp/org-mac-link.el (org-mac-grab-link): Do not quote
  lambdas.
This commit is contained in:
Alan Schmitt 2015-12-18 11:28:39 +01:00
parent 2e251821ce
commit e43d0abdd1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/lisp/org-mac-link.el
View File

@ -256,7 +256,7 @@ When done, go grab the link, and insert it at point."
input)
;; Create the menu string for the keymap
(mapc '(lambda (descriptor)
(mapc (lambda (descriptor)
(when (elt descriptor 3)
(setf menu-string (concat menu-string
"[" (elt descriptor 0) "]"
@ -267,7 +267,7 @@ When done, go grab the link, and insert it at point."
;; Prompt the user, and grab the link
(message menu-string)
(setq input (read-char-exclusive))
(mapc '(lambda (descriptor)
(mapc (lambda (descriptor)
(let ((key (elt (elt descriptor 0) 0))
(active (elt descriptor 3))
(grab-function (elt descriptor 2)))