From 7f8147ed5815e04640a30666a591fe6ac08edcaa Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Sun, 15 Jul 2001 20:36:39 +0000 Subject: [PATCH] Error message convention changes. --- contrib/canlock.el | 2 +- contrib/gpg.el | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/contrib/canlock.el b/contrib/canlock.el index 474b834f8..3cce006b4 100644 --- a/contrib/canlock.el +++ b/contrib/canlock.el @@ -430,7 +430,7 @@ is not specified, it runs in place." (insert header) (canlock-verify)))) (or canlock-ignore-errors - (error "Folder buffer has been killed.")))) + (error "Folder buffer has been killed")))) ;;;###autoload (defun cmail-summary-canlock-verify () diff --git a/contrib/gpg.el b/contrib/gpg.el index 45f83fa23..04842a1fe 100644 --- a/contrib/gpg.el +++ b/contrib/gpg.el @@ -7,7 +7,7 @@ ;; Keywords: crypto ;; Created: 2000-04-15 -;; $Id: gpg.el,v 1.11 2001/01/19 02:04:46 zsh Exp $ +;; $Id: gpg.el,v 1.12 2001/07/13 19:31:08 zsh Exp $ ;; This file is NOT (yet?) part of GNU Emacs. @@ -631,7 +631,7 @@ adjust according to `gpg-command-passphrase-env'." ;; temporary file resides in a world-writable directory. (unless (or (memq system-type '(windows-nt cygwin32 win32 w32 mswindows)) (eq (file-modes gpg-temp-directory) 448)) ; mode 0700 - (error "Directory for temporary files (%s) must have mode 0700." gpg-temp-directory)) + (error "Directory for temporary files (%s) must have mode 0700" gpg-temp-directory)) (setq name (make-temp-name name)) (let ((mode (default-file-modes))) (unwind-protect @@ -763,7 +763,7 @@ Never set this variable directly, use `gpg-show-result' instead.") (save-window-excursion (display-buffer (current-buffer)) (unless (y-or-n-p "Continue? ") - (error "GnuPG operation aborted.")))))) + (error "GnuPG operation aborted")))))) (defmacro gpg-show-result (always-show &rest body) "Show GnuPG result to user for confirmation. -- 2.25.1