summaryrefslogtreecommitdiff
path: root/lisp/whitespace.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2007-12-16 05:08:49 +0000
committerMiles Bader <miles@gnu.org>2007-12-16 05:08:49 +0000
commitd29ee6b1a110cf5d170a10317a96acbbd4a1c68b (patch)
tree58f3c40766d8d56de7d2b026c29e198764d910aa /lisp/whitespace.el
parent7e095e45a3f790e4608c88db9648d248e24901dc (diff)
parent47854a55680b5809811caf72f66ecbe8289c2855 (diff)
downloademacs-d29ee6b1a110cf5d170a10317a96acbbd4a1c68b.tar.gz
emacs-d29ee6b1a110cf5d170a10317a96acbbd4a1c68b.tar.bz2
emacs-d29ee6b1a110cf5d170a10317a96acbbd4a1c68b.zip
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-300
Diffstat (limited to 'lisp/whitespace.el')
-rw-r--r--lisp/whitespace.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index f6c94534a00..896668fd569 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -789,8 +789,8 @@ This is meant to be added buffer-locally to `write-file-functions'."
(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 ()