# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1141812707 0
# Node ID e7e05b5e771f7dd7a82835f8ef09688d7792e73e
# Parent  f6d157f9695098adb31995758b3591693608cca4
(view-lossage): Remove trailing whitespace before inserting "\n".

diff -r f6d157f96950 -r e7e05b5e771f lisp/help.el
--- 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)))