Mercurial > emacs
comparison 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 |
comparison
equal
deleted
inserted
replaced
69334:f6d157f96950 | 69335:e7e05b5e771f |
---|---|
427 (recent-keys) | 427 (recent-keys) |
428 " ")) | 428 " ")) |
429 (with-current-buffer standard-output | 429 (with-current-buffer standard-output |
430 (goto-char (point-min)) | 430 (goto-char (point-min)) |
431 (while (progn (move-to-column 50) (not (eobp))) | 431 (while (progn (move-to-column 50) (not (eobp))) |
432 (search-forward " " nil t) | 432 (when (search-forward " " nil t) |
433 (insert "\n"))) | 433 (delete-char -1)) |
434 (insert "\n"))) | |
434 (print-help-return-message))) | 435 (print-help-return-message))) |
435 | 436 |
436 | 437 |
437 ;; Key bindings | 438 ;; Key bindings |
438 | 439 |