Adjust comment.

This commit is contained in:
Vinicius Jose Latorre 2011-10-30 23:39:04 -02:00
parent e1cf81b4ad
commit 44a31225c3

View file

@ -2408,8 +2408,8 @@ resultant list will be returned."
"Match trailing spaces which do not contain the point at end of line."
(let ((status t))
(while (if (re-search-forward whitespace-trailing-regexp limit t)
(= whitespace-point (match-end 1)) ;; Loop if point at eol.
(setq status nil))) ;; End of buffer.
(= whitespace-point (match-end 1)) ;; loop if point at eol
(setq status nil))) ;; end of buffer
status))