mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Fix buggy calls to `error'.

Browse source
This commit is contained in:
Deepak Goel 2007-12-06 17:56:42 +00:00
parent 864da779a6
commit 8c16bd8c35
12 changed files with 37 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/whitespace.el
View file

@ -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 ()