# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1192043933 0
# Node ID caa57db87d2aaf11905dbadb15cb858c83d67277
# Parent  8ba0e30716a5e24b2c1810a988db7d097bdb85a0
(describe-variable): Add missing "  " for multiline
obsolescence info and missing EOL after global value.

diff -r 8ba0e30716a5 -r caa57db87d2a lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Oct 10 18:52:45 2007 +0000
+++ b/lisp/ChangeLog	Wed Oct 10 19:18:53 2007 +0000
@@ -1,3 +1,8 @@
+2007-10-10  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* help-fns.el (describe-variable): Add missing "  " for multiline
+	obsolescence info and missing EOL after global value.
+
 2007-10-10  Eric S. Raymond  <esr@snark.thyrsus.com>
 
 	* add-log.el:
diff -r 8ba0e30716a5 -r caa57db87d2a lisp/help-fns.el
--- a/lisp/help-fns.el	Wed Oct 10 18:52:45 2007 +0000
+++ b/lisp/help-fns.el	Wed Oct 10 19:18:53 2007 +0000
@@ -565,7 +565,8 @@
 		      ;; See previous comment for this function.
 		      ;; (help-xref-on-pp from (point))
 		      (if (< (point) (+ from 20))
-			  (delete-region (1- from) from)))))))
+			  (delete-region (1- from) from))))))
+              (terpri))
 
 	    ;; If the value is large, move it to the end.
 	    (with-current-buffer standard-output
@@ -617,7 +618,7 @@
                 (setq extra-line t)
                 (princ "  This variable is obsolete")
                 (if (cdr obsolete) (princ (format " since %s" (cdr obsolete))))
-                (princ ";") (terpri)
+                (princ ";\n  ")
                 (princ (if (stringp (car obsolete)) (car obsolete)
                          (format "use `%s' instead." (car obsolete))))
                 (terpri))