diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2018-07-03 18:16:52 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2018-07-03 18:16:52 -0400 |
| commit | f9f0c993845cc51517cef6ed06b0cabe102dcd9f (patch) | |
| tree | 3180b82a8ca04eca3d606fdddcd26d24032137bd | |
| parent | 9d274c3e1c77c1f29c040901108fe5fb8a843044 (diff) | |
| download | emacs-f9f0c993845cc51517cef6ed06b0cabe102dcd9f.tar.gz emacs-f9f0c993845cc51517cef6ed06b0cabe102dcd9f.tar.bz2 emacs-f9f0c993845cc51517cef6ed06b0cabe102dcd9f.zip | |
* lisp/mail/sendmail.el: Use lexical-binding
(mail-recover-1): Declare dired-trivial-filenames.
| -rw-r--r-- | lisp/mail/sendmail.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 29a1ae2657e..50dd81039e7 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -1,4 +1,4 @@ -;;; sendmail.el --- mail sending commands for Emacs +;;; sendmail.el --- mail sending commands for Emacs -*- lexical-binding:t -*- ;; Copyright (C) 1985-1986, 1992-1996, 1998, 2000-2018 Free Software ;; Foundation, Inc. @@ -1144,7 +1144,7 @@ to combine them into one, and does so if the user says y." ;; Try to preserve alignment of contents of the field (let ((prefix-length (length (match-string 0)))) (replace-match " ") - (dotimes (i (1- prefix-length)) + (dotimes (_ (1- prefix-length)) (insert " "))))))) (set-marker first-to-end nil)))))) @@ -1957,6 +1957,7 @@ The seventh argument ACTIONS is a list of actions to take ;; Require dired so that dired-trivial-filenames does not get ;; unbound on exit from the let. (require 'dired) + (defvar dired-trivial-filenames) (let ((dired-trivial-filenames t)) (dired-other-window wildcard (concat dired-listing-switches " -t"))) (rename-buffer "*Auto-saved Drafts*" t) |