summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/mail-utils.el5
-rw-r--r--lisp/mail/mailabbrev.el2
-rw-r--r--lisp/mail/rfc822.el4
-rw-r--r--lisp/mail/rmail.el5
-rw-r--r--lisp/mail/rmailsort.el3
-rw-r--r--lisp/mail/rnews.el5
-rw-r--r--lisp/mail/sendmail.el5
7 files changed, 17 insertions, 12 deletions
diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index 4f97f1d3508..b25edf5cb5e 100644
--- a/lisp/mail/mail-utils.el
+++ b/lisp/mail/mail-utils.el
@@ -18,8 +18,6 @@
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
-(provide 'mail-utils)
-
;;; We require lisp-mode to make sure that lisp-mode-syntax-table has
;;; been initialized.
(require 'lisp-mode)
@@ -199,3 +197,6 @@ If third arg ALL is non-nil, concatenate all such fields with commas between."
"\\|"
(substring labels (match-end 0))))))
labels)
+
+(provide 'mail-utils)
+
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el
index 5efa9eadd4b..d48d8e80767 100644
--- a/lisp/mail/mailabbrev.el
+++ b/lisp/mail/mailabbrev.el
@@ -427,6 +427,6 @@ mail-mode-syntax-table is used when the cursor is not in an address header.")
t))))
(setq mail-aliases nil)
(build-mail-aliases file))
-
+
(provide 'mail-abbrevs)
diff --git a/lisp/mail/rfc822.el b/lisp/mail/rfc822.el
index b7e43f62cda..ac63ce63687 100644
--- a/lisp/mail/rfc822.el
+++ b/lisp/mail/rfc822.el
@@ -18,8 +18,6 @@
;; along with GNU Emacs; see the file COPYING. If not, write to
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
-(provide 'rfc822)
-
;; uses address-start free, throws to address
(defun rfc822-bad-address (reason)
(save-restriction
@@ -304,3 +302,5 @@
(nreverse list)))
(and buf (kill-buffer buf))))))
+(provide 'rfc822)
+
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 8c966ce9604..ace3498a13b 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -24,8 +24,6 @@
;; expunging by dispatch table, sticky options for file commands.
(require 'mail-utils)
-(provide 'rmail)
-
; These variables now declared paths.el
;(defvar rmail-spool-directory "/usr/spool/mail/"
; "This is the name of the directory used by the system mailer for\n\
@@ -1605,3 +1603,6 @@ buffer visiting that file."
"Break up a digest message into its constituent messages.
Leaves original message, deleted, before the undigestified messages."
t)
+
+(provide 'rmail)
+
diff --git a/lisp/mail/rmailsort.el b/lisp/mail/rmailsort.el
index e1f01ad2f8f..3bc00ddbf1b 100644
--- a/lisp/mail/rmailsort.el
+++ b/lisp/mail/rmailsort.el
@@ -19,7 +19,6 @@
;; file named COPYING. Among other things, the copyright notice
;; and this notice must be preserved on all copies.
-(provide 'rmailsort)
(require 'rmail)
(require 'sort)
@@ -201,3 +200,5 @@ Arguments are MSG and FIELD."
(if (<= (length year-string) 2)
(concat "19" year-string)
year-string))
+
+(provide 'rmailsort)
diff --git a/lisp/mail/rnews.el b/lisp/mail/rnews.el
index 64b98ca407b..d96738af30f 100644
--- a/lisp/mail/rnews.el
+++ b/lisp/mail/rnews.el
@@ -42,8 +42,7 @@
;; tower@prep Oct 29 1986
;; added caesar-region, rename news-caesar-buffer-body, hacked accordingly
;; tower@prep Nov 21 1986
-;; added (provide 'rnews) tower@prep 22 Apr 87
-(provide 'rnews)
+;; added tower@prep 22 Apr 87
(require 'mail-utils)
(autoload 'rmail-output "rmailout"
@@ -977,3 +976,5 @@ Mail and USENET news headers are not rotated."
(goto-char (point-max))
(caesar-region rotnum)
(setq buffer-read-only buffer-status))))
+
+(provide 'rnews) (provide 'rnews)
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index c22d7d85c07..24824dfc0f9 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -18,8 +18,6 @@
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
-(provide 'sendmail)
-
;;;###autoload
(defconst mail-self-blind nil "\
Non-nil means insert BCC to self in messages to be sent.
@@ -660,3 +658,6 @@ The seventh argument ACTIONS is a list of actions to take
;;; Do not add anything but external entries on this page.
+
+(provide 'sendmail)
+