Commit a149fa51 authored by Chong Yidong's avatar Chong Yidong
Browse files

* whitespace.el (whitespace-cleanup): Fix whitespace-empty-at-bob-regexp usage.

Fixes: debbugs:11492
parent 2b311310
2012-05-29 Chong Yidong <>
* whitespace.el (whitespace-cleanup): Fix usage of
whitespace-empty-at-bob-regexp (Bug#11492).
2012-05-29 Aaron S. Hawley <>
* vc/vc.el (vc-revert, vc-rollback): Dont kill vc-diff buffer on
......@@ -1533,8 +1533,7 @@ documentation."
(when (memq 'empty whitespace-style)
(let (overwrite-mode) ; enforce no overwrite
(goto-char (point-min))
(when (re-search-forward
(concat "\\`" whitespace-empty-at-bob-regexp) nil t)
(when (looking-at whitespace-empty-at-bob-regexp)
(delete-region (match-beginning 1) (match-end 1)))
(when (re-search-forward
(concat whitespace-empty-at-eob-regexp "\\'") nil t)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment