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

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

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

revision 1.56 by jas, Tue May 13 19:48:21 2003 UTC revision 1.57 by lektu, Sun Jul 13 17:20:34 2003 UTC
# Line 354  This is relative to `smtpmail-queue-dir' Line 354  This is relative to `smtpmail-queue-dir'
354                     (buffer-data (create-file-buffer file-data))                     (buffer-data (create-file-buffer file-data))
355                     (buffer-elisp (create-file-buffer file-elisp))                     (buffer-elisp (create-file-buffer file-elisp))
356                     (buffer-scratch "*queue-mail*"))                     (buffer-scratch "*queue-mail*"))
357                  (unless (file-exists-p smtpmail-queue-dir)
358                    (make-directory smtpmail-queue-dir t))
359                (with-current-buffer buffer-data                (with-current-buffer buffer-data
360                  (erase-buffer)                  (erase-buffer)
361                  (insert-buffer tembuf)                  (insert-buffer tembuf)

Legend:
Removed from v.1.56  
changed lines
  Added in v.1.57

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