]> code.delx.au - gnu-emacs/blobdiff - lisp/nnmail.el
(mh-version): Use mh-e-RCS-id rather than mh-e-version
[gnu-emacs] / lisp / nnmail.el
index a8eecb18baa509b4407b37f878d6bbc39874b30d..30b4741b37b3187f223d31366ae9d0997aef40a4 100644 (file)
@@ -1,4 +1,5 @@
 ;;; nnmail.el --- mail support functions for the Gnus mail backends
+
 ;; Copyright (C) 1995 Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
@@ -17,8 +18,9 @@
 ;; GNU General Public License for more details.
 
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING.  If not, write to
-;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
 
 ;;; Commentary:
 
@@ -411,9 +413,9 @@ performed.")
                   (if (looking-at "movemail: ")
                       (delete-region (point-min) (match-end 0)))
                   (beep t)
-                  (message (concat "movemail: "
-                                   (buffer-substring (point-min)
-                                                     (point-max))))
+                  (message "movemail: %s"
+                           (buffer-substring (point-min)
+                                             (point-max)))
                   (sit-for 3)
                   nil)))))
     (and errors