/[emacs]/emacs/lisp/mail/sendmail.el
ViewVC logotype

Diff of /emacs/lisp/mail/sendmail.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.253 by rms, Thu Apr 25 21:33:14 2002 UTC revision 1.254 by rms, Sun Apr 28 22:35:54 2002 UTC
# Line 1561  The seventh argument ACTIONS is a list o Line 1561  The seventh argument ACTIONS is a list o
1561      ;; "#<RANDOM-STUFF>#" to the buffer name, where RANDOM-STUFF      ;; "#<RANDOM-STUFF>#" to the buffer name, where RANDOM-STUFF
1562      ;; is the result of (make-temp-name "").      ;; is the result of (make-temp-name "").
1563      (setq non-random-len      (setq non-random-len
1564            (- (length file-name) (length (make-temp-name ""))))            (- (length file-name) (length (make-temp-name "")) 1))
1565      (setq wildcard (concat (substring file-name 0 non-random-len) "*"))      (setq wildcard (concat (substring file-name 0 non-random-len) "*"))
1566        (debug)
1567      (if (null (file-expand-wildcards wildcard))      (if (null (file-expand-wildcards wildcard))
1568          (message "There are no auto-saved drafts to recover")          (message "There are no auto-saved drafts to recover")
1569        ;; Bind dired-trivial-filenames to t because all auto-save file        ;; Bind dired-trivial-filenames to t because all auto-save file

Legend:
Removed from v.1.253  
changed lines
  Added in v.1.254

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26