From 846428cfd447fc4e534e001191c04a5ad8bd098b Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Mon, 27 Jan 2020 08:41:24 +0100 Subject: [PATCH] Unquote lambda's * mu4e/mu4e-context.el (mu4e-context-switch): Do it. * mu4e/mu4e-contrib.el (mu4e-view-mode-hook): Do it. (mu4e-headers-mode-hook): Do it. * mu4e/mu4e-icalendar.el (mu4e-icalendar-reply-ical): Do it. * mu4e/mu4e-utils.el (mu4e~start): Do it. (mu4e-split-ranges-to-numbers): Do it. --- mu4e/mu4e-context.el | 2 +- mu4e/mu4e-contrib.el | 4 ++-- mu4e/mu4e-icalendar.el | 2 +- mu4e/mu4e-utils.el | 4 ++-- 4 files changed, 6 insertions(+), 6 deletions(-) diff --git a/mu4e/mu4e-context.el b/mu4e/mu4e-context.el index e26d80c2..e314e78d 100644 --- a/mu4e/mu4e-context.el +++ b/mu4e/mu4e-context.el @@ -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) diff --git a/mu4e/mu4e-contrib.el b/mu4e/mu4e-contrib.el index be9e5ef5..ed611acf 100644 --- a/mu4e/mu4e-contrib.el +++ b/mu4e/mu4e-contrib.el @@ -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))) diff --git a/mu4e/mu4e-icalendar.el b/mu4e/mu4e-icalendar.el index 0f6b39a7..d50eaae5 100644 --- a/mu4e/mu4e-icalendar.el +++ b/mu4e/mu4e-icalendar.el @@ -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)))) diff --git a/mu4e/mu4e-utils.el b/mu4e/mu4e-utils.el index 0a9b8073..2edeb7cb 100644 --- a/mu4e/mu4e-utils.el +++ b/mu4e/mu4e-utils.el @@ -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))