summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-scan.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2021-03-23 01:00:56 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2021-03-23 01:00:56 -0400
commit667e002e91a26c20089c5843254a39b771b64ab7 (patch)
treec03e8163042399b164f0d910b37604aa37ebbcf1 /lisp/mh-e/mh-scan.el
parentefd80237ca6085f28497bded259a92a48bb6005e (diff)
downloademacs-667e002e91a26c20089c5843254a39b771b64ab7.tar.gz
* lisp/mh-e: Enable lexical-binding in all the files
* lisp/mh-e/mh-alias.el: Use lexical-binding. (mh-alias-insert-file): Completion tables can be mere lists of strings. * lisp/mh-e/mh-mime.el: Use lexical-binding. (mh-mm-inline-message): Remove always-nil var `visible-headers`. * lisp/mh-e/mh-search.el: Use lexical-binding. (mh-search-folder): Remove unused var `pick-folder`. * lisp/mh-e/mh-show.el: Use lexical-binding. (mh-display-msg): Remove always-nil var `visible-headers`. * lisp/mh-e/mh-utils.el: Use lexical-binding. (completion-root-regexp): Always declare var. * lisp/mh-e/mh-buffers.el: Use lexical-binding. * lisp/mh-e/mh-comp.el: Use lexical-binding. * lisp/mh-e/mh-folder.el: Use lexical-binding. * lisp/mh-e/mh-funcs.el: Use lexical-binding. * lisp/mh-e/mh-gnus.el: Use lexical-binding. * lisp/mh-e/mh-identity.el: Use lexical-binding. * lisp/mh-e/mh-inc.el: Use lexical-binding. * lisp/mh-e/mh-junk.el: Use lexical-binding. * lisp/mh-e/mh-letter.el: Use lexical-binding. * lisp/mh-e/mh-limit.el: Use lexical-binding. * lisp/mh-e/mh-print.el: Use lexical-binding. * lisp/mh-e/mh-scan.el: Use lexical-binding. * lisp/mh-e/mh-seq.el: Use lexical-binding. * lisp/mh-e/mh-speed.el: Use lexical-binding. * lisp/mh-e/mh-thread.el: Use lexical-binding. * lisp/mh-e/mh-tool-bar.el: Use lexical-binding. * lisp/mh-e/mh-xface.el: Use lexical-binding.
Diffstat (limited to 'lisp/mh-e/mh-scan.el')
-rw-r--r--lisp/mh-e/mh-scan.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mh-e/mh-scan.el b/lisp/mh-e/mh-scan.el
index cec331389b0..f00ab22958a 100644
--- a/lisp/mh-e/mh-scan.el
+++ b/lisp/mh-e/mh-scan.el
@@ -1,4 +1,4 @@
-;;; mh-scan.el --- MH-E scan line constants and utilities
+;;; mh-scan.el --- MH-E scan line constants and utilities -*- lexical-binding: t; -*-
;; Copyright (C) 1993, 1995, 1997, 2000-2021 Free Software Foundation,
;; Inc.
@@ -497,7 +497,7 @@ with `mh-scan-msg-format-string'."
(width 0))
(with-current-buffer tmp-buffer
(erase-buffer)
- (apply 'call-process
+ (apply #'call-process
(expand-file-name mh-scan-prog mh-progs) nil '(t nil) nil
(list folder "last" "-format" "%(msg)"))
(goto-char (point-min))