equal
deleted
inserted
replaced
1169 (setq fortune-file "~/XXX") |
1169 (setq fortune-file "~/XXX") |
1170 |
1170 |
1171 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1171 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1172 (message "smtp, smtpmail") |
1172 (message "smtp, smtpmail") |
1173 |
1173 |
1174 (setq |
1174 (when (boundp 'smtpmail-smtp-server) |
1175 ;; If you use the default mail user agent. |
1175 (require 'smtpmail) |
1176 send-mail-function 'smtpmail-send-it |
1176 (setq |
1177 ;; If you use Message or Gnus. |
1177 ;; If you use the default mail user agent. |
1178 message-send-mail-function 'smtpmail-send-it |
1178 send-mail-function 'smtpmail-send-it |
1179 ) |
1179 ;; If you use Message or Gnus. |
|
1180 message-send-mail-function 'smtpmail-send-it |
|
1181 ) |
|
1182 ) |
1180 ;; (setq smtpmail-debug-verb t) |
1183 ;; (setq smtpmail-debug-verb t) |
1181 ;; (setq smtpmail-debug-info t) |
1184 ;; (setq smtpmail-debug-info t) |
1182 |
1185 |
1183 (defun my-message-mode-hook () |
1186 (defun my-message-mode-hook () |
1184 (setq fill-column 78) |
1187 (setq fill-column 78) |