Mercurial > emacs
diff lisp/help.el @ 69335:e7e05b5e771f
(view-lossage): Remove trailing whitespace before inserting "\n".
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Wed, 08 Mar 2006 10:11:47 +0000 |
parents | f309eed94981 |
children | 1d0de172f9fa a7364c1a561e |
line wrap: on
line diff
--- a/lisp/help.el Wed Mar 08 03:25:26 2006 +0000 +++ b/lisp/help.el Wed Mar 08 10:11:47 2006 +0000 @@ -429,8 +429,9 @@ (with-current-buffer standard-output (goto-char (point-min)) (while (progn (move-to-column 50) (not (eobp))) - (search-forward " " nil t) - (insert "\n"))) + (when (search-forward " " nil t) + (delete-char -1)) + (insert "\n"))) (print-help-return-message)))