(widen)))
(delete-region p (point-max))
(goto-char (point-min))
- ;; Some blank line to seperate mails.
+ ;; Some blank line to separate mails.
(insert "\n\nFrom nobody " (current-time-string) "\n")
(insert "X-Gnus-Webmail: " (symbol-value 'user)
"@" (symbol-name webmail-type) "\n")
(setq p (point))))
(delete-region p (point-max))
(goto-char (point-min))
- ;; Some blank line to seperate mails.
+ ;; Some blank line to separate mails.
(insert "\n\nFrom nobody " (current-time-string) "\n")
(insert "X-Gnus-Webmail: " (symbol-value 'user)
"@" (symbol-name webmail-type) "\n")
(setq mime (webmail-netaddress-single-part))
(widen))
(goto-char (point-min))
- ;; Some blank line to seperate mails.
+ ;; Some blank line to separate mails.
(insert "\n\nFrom nobody " (current-time-string) "\n")
(insert "X-Gnus-Webmail: " (symbol-value 'user)
"@" (symbol-name webmail-type) "\n")
(setq mime (webmail-netaddress-single-part))
(widen))
(goto-char (point-min))
- ;; Some blank line to seperate mails.
+ ;; Some blank line to separate mails.
(insert "\n\nFrom nobody " (current-time-string) "\n")
(insert "X-Gnus-Webmail: " (symbol-value 'user)
"@" (symbol-name webmail-type) "\n")
(provide 'webmail)
-;; arch-tag: f75a4558-a8f6-46ec-b1c3-7a6434b3dd71
;;; webmail.el ends here