diff options
| author | Richard M. Stallman <[email protected]> | 1996-06-10 15:53:37 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1996-06-10 15:53:37 +0000 |
| commit | ca09ceaf4b297d15e372650865e0a45a74fa9f01 (patch) | |
| tree | 7f1d249609995e96dbdc79d84e1888476c36f1ce /lisp/mail | |
| parent | f7894e88206bc3bb072057f285b1f1bc0c4c1fa3 (diff) | |
Comment change.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/smtpmail.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el index 74b065a471..660dfa1b1f 100644 --- a/lisp/mail/smtpmail.el +++ b/lisp/mail/smtpmail.el @@ -284,14 +284,12 @@ don't define this value.") (delete-process process)))))) -;; check completely by T.Kagatani (defun smtpmail-process-filter (process output) (save-excursion (set-buffer (process-buffer process)) (goto-char (point-max)) (insert output))) -;; check completely by T.Kagatani (defun smtpmail-read-response (process) (let ((case-fold-search nil) (response-string nil) @@ -342,7 +340,6 @@ don't define this value.") return-value)) -;; check completely by T.Kagatani (defun smtpmail-send-command (process command) (goto-char (point-max)) (if (= (aref command 0) ?P) @@ -352,7 +349,6 @@ don't define this value.") (process-send-string process command) (process-send-string process "\r\n")) -;; check completely by T.Kagatani (defun smtpmail-send-data-1 (process data) (goto-char (point-max)) |