Mercurial > emacs

diff lisp/whitespace.el @ 87139:f358a2fd5895

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix buggy calls to `error'.
author Deepak Goel <deego@gnufans.org>
date Thu, 06 Dec 2007 17:56:42 +0000
parents d3e87ee5aa0e
children 20bb7aaa7b12 2fcaae6177a5
line wrap: on
line diff
--- a/lisp/whitespace.el	Thu Dec 06 17:25:03 2007 +0000
+++ b/lisp/whitespace.el	Thu Dec 06 17:56:42 2007 +0000
@@ -789,8 +789,8 @@
 	(whitespace-cleanup-internal)
       (setq werr (whitespace-buffer)))
     (if (and whitespace-abort-on-error werr)
-	(error (concat "Abort write due to whitespaces in "
-		       buffer-file-name))))
+	(error "Abort write due to whitespaces in %s"
+		       buffer-file-name)))
   nil)
 
 (defun whitespace-unload-function ()