Function: whitespace-write-file-hook

whitespace-write-file-hook is a byte-compiled function defined in whitespace.el.gz.

Signature

(whitespace-write-file-hook)

Documentation

Action to be taken when buffer is written.

It should be added buffer-locally to write-file-functions.

Source Code

;; Defined in /usr/src/emacs/lisp/whitespace.el.gz
(defun whitespace-write-file-hook ()
  "Action to be taken when buffer is written.
It should be added buffer-locally to `write-file-functions'."
  (cond ((memq 'auto-cleanup whitespace-action)
	 (whitespace-cleanup))
	((memq 'abort-on-bogus whitespace-action)
	 (when (whitespace-report nil t)
	   (error "Abort write due to whitespace problems in %s"
		  (buffer-name)))))
  nil)					; continue hook processing