andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove a use of lexical-let

Browse source 
* lisp/gnus/message.el (message-completion-function): Just use let,
since the file now uses lexical-binding.
This commit is contained in:
Mark Oteiza 2016-12-27 11:09:39 -05:00
parent eff237503c
commit ee264827f3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/gnus/message.el
View file

@ -7946,7 +7946,7 @@ regular text mode tabbing command."
(not (mail-abbrev-in-expansion-header-p))))
(setq alist (cdr alist)))
(when (cdar alist)
(lexical-let ((fun (cdar alist)))
(let ((fun (cdar alist)))
;; Even if completion fails, return a non-nil value, so as to avoid
;; falling back to message-tab-body-function.
(lambda () (funcall fun) 'completion-attempted)))))