* help-fns.el (describe-variable): Fix 2010-12-17 change (Bug#7511).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 25cc72d0b7f3874c4c7e0c3593560f6b3e8858b4..dcdfa3ebc8826dddf905f4eecb23243f9aa579aa 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-12-20  Leo  <sdl.web@gmail.com>
+
+       * help-fns.el (describe-variable): Fix 2010-12-17 change.
+
 2010-12-20  Juri Linkov  <juri@jurta.org>
 
        * isearch.el (isearch-lazy-highlight-error): New variable.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 5743e1f601970e3e038b1bedcd189a2bddf6fbc3..5050244237d4d72d8e766f91125830b4345a1bbb 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -639,7 +639,7 @@ it is displayed along with the global value."
                (let ((from (point)))
                  (terpri)
                  (pp val)
-                 (if (< (point) (- 68 (line-beginning-position -1)))
+                 (if (< (point) (+ 68 (line-beginning-position 0)))
                      (delete-region from (1+ from))
                    (delete-region (1- from) from)))))
            (terpri)