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
f38d3514
Commit
f38d3514
authored
Aug 29, 1998
by
Karl Heuer
Browse files
(smtpmail-send-it): Add autoload cookie.
(smtpmail-via-smtp): Check that smtpmail-smtp-server is defined.
parent
66cb9c07
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
8 deletions
+7
-8
lisp/mail/smtpmail.el
lisp/mail/smtpmail.el
+7
-8
No files found.
lisp/mail/smtpmail.el
View file @
f38d3514
...
...
@@ -28,16 +28,13 @@
;; Send Mail to smtp host from smtpmail temp buffer.
;; Please add these lines in your .emacs(_emacs).
;; Please add these lines in your .emacs(_emacs)
or use customize
.
;;
;;(setq send-mail-function 'smtpmail-send-it)
;;(setq send-mail-function 'smtpmail-send-it) ; if you use `mail'
;;(setq message-send-mail-function 'smtpmail-send-it) ; if you use `message'
;;(setq smtpmail-default-smtp-server "YOUR SMTP HOST")
;;(setq smtpmail-smtp-service "smtp")
;;(setq smtpmail-local-domain "YOUR DOMAIN NAME")
;;(setq smtpmail-debug-info t)
;;(load-library "smtpmail")
;;(setq smtpmail-code-conv-from nil)
;;(setq user-full-name "YOUR NAME HERE")
;;(setq smtpmail-debug-info t) ; only to debug problems
;; To queue mail, set smtpmail-queue-mail to t and use
;; smtpmail-send-queued-mail to send.
...
...
@@ -110,6 +107,7 @@ This is relative to `smtpmail-queue-dir'.")
;;;
;;;
;;;###autoload
(
defun
smtpmail-send-it
()
(
require
'mail-utils
)
(
let
((
errbuf
(
if
mail-interactive
...
...
@@ -298,7 +296,8 @@ This is relative to `smtpmail-queue-dir'.")
(
defun
smtpmail-via-smtp
(
recipient
smtpmail-text-buffer
)
(
let
((
process
nil
)
(
host
smtpmail-smtp-server
)
(
host
(
or
smtpmail-smtp-server
(
error
"`smtpmail-smtp-server' not defined"
)))
(
port
smtpmail-smtp-service
)
response-code
greeting
...
...
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