Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
ca09ceaf
Commit
ca09ceaf
authored
Jun 10, 1996
by
Richard M. Stallman
Browse files
Comment change.
parent
f7894e88
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
0 additions
and
4 deletions
+0
-4
lisp/mail/smtpmail.el
lisp/mail/smtpmail.el
+0
-4
No files found.
lisp/mail/smtpmail.el
View file @
ca09ceaf
...
...
@@ -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
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment