diff lisp/mail/mh-utils.el @ 38414:67b464da13ec

Some fixes to follow coding conventions.
author Pavel Janík <Pavel@Janik.cz>
date Sun, 15 Jul 2001 19:53:53 +0000
parents 3dab3c3ae5ee
children f97f856ea2b6
line wrap: on
line diff
--- a/lisp/mail/mh-utils.el	Sun Jul 15 17:42:53 2001 +0000
+++ b/lisp/mail/mh-utils.el	Sun Jul 15 19:53:53 2001 +0000
@@ -1,9 +1,9 @@
 ;;; mh-utils.el --- mh-e code needed for both sending and reading
-;; Time-stamp: <95/10/22 17:58:16 gildea>
+;; Time-stamp: <2001-07-15 09:52:59 pavel>
 
 ;; Copyright (C) 1993, 1995, 1997, 2000 Free Software Foundation, Inc.
 
-;; This file is part of mh-e, part of GNU Emacs.
+;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -579,7 +579,7 @@
 	    (if (not (mh-folder-name-p mh-draft-folder))
 		(setq mh-draft-folder (format "+%s" mh-draft-folder)))
 	    (if (not (file-exists-p (mh-expand-file-name mh-draft-folder)))
-		(error "Draft folder \"%s\" not found.  Create it and try again."
+		(error "Draft folder \"%s\" not found.  Create it and try again"
 		       (mh-expand-file-name mh-draft-folder)))))
       (setq mh-inbox (mh-get-profile-field "Inbox:"))
       (cond ((not mh-inbox)
@@ -978,7 +978,7 @@
 						 (end-of-line)
 						 (point))))
 	     (display-buffer (current-buffer))
-	     (error "%s failed with status %d.  See error message in other window."
+	     (error "%s failed with status %d.  See error message in other window"
 		    command status)))))))