Mercurial > emacs
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)))))))