Merge pull request #1555 from thierryvolpiatto/Unquote_lambda

mu4e: Unquote lambda's
This commit is contained in:
Dirk-Jan C. Binnema 2020-01-28 00:36:24 +02:00 committed by GitHub
commit 0b12d0e568
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 6 additions and 6 deletions

View File

@ -234,7 +234,7 @@ non-nil."
(when (mu4e-context-enter-func context)
(funcall (mu4e-context-enter-func context)))
(when (mu4e-context-vars context)
(mapc #'(lambda (cell)
(mapc (lambda (cell)
(set (car cell) (cdr cell)))
(mu4e-context-vars context)))
(setq mu4e~context-current context)

View File

@ -57,12 +57,12 @@
;; Probably this can be moved to mu4e-view.el.
(add-hook 'mu4e-view-mode-hook
#'(lambda ()
(lambda ()
(set (make-local-variable 'bookmark-make-record-function)
'mu4e-view-bookmark-make-record)))
;; And this can be moved to mu4e-headers.el.
(add-hook 'mu4e-headers-mode-hook
#'(lambda ()
(lambda ()
(set (make-local-variable 'bookmark-make-record-function)
'mu4e-view-bookmark-make-record)))

View File

@ -150,7 +150,7 @@ response in icalendar format."
;; also trash the message (thus must be appended to hooks).
(add-hook
'message-sent-hook
#'(lambda () (setq mu4e-sent-func
(lambda () (setq mu4e-sent-func
(mu4e~icalendar-trash-message original-msg)))
t t))))

View File

@ -815,7 +815,7 @@ When successful, call FUNC (if non-nil) afterwards."
(mu4e~context-autoswitch nil mu4e-context-policy)
(mu4e~check-requirements)
;; set up the 'pong' handler func
(setq mu4e-pong-func #'(lambda (props) (mu4e~pong-handler props func)))
(setq mu4e-pong-func (lambda (props) (mu4e~pong-handler props func)))
;; wake up server
(mu4e~proc-ping
(mapcar ;; send it a list of queries we'd like to see read/unread info
@ -1098,7 +1098,7 @@ This includes expanding e.g. 3-5 into 3,4,5. If the letter
(cl-pushnew (string-to-number elem) list :test 'equal)))
;; Check that all numbers are valid.
(mapc
#'(lambda (x)
(lambda (x)
(cond
((> x n)
(mu4e-warn "Attachment %d bigger than maximum (%d)" x n))