Set calc-summary-indentation even when Calc Summary buffer exists.

diff --git a/lisp/calc/calc-help.el b/lisp/calc/calc-help.el
index 660e4c37bccfe8f18d2080aeb27b9edbea056d7e..087c42d295c51d6004688d7304bad1c8cc46fc70 100644 (file)
--- a/lisp/calc/calc-help.el
+++ b/lisp/calc/calc-help.el
@@ -186,11 +186,12 @@ C-w  Describe how there is no warranty for Calc."
                                 (copy-to-buffer "*Calc Summary*"
                                                 (point) (point-max))
                                  (if Info-history
-                                     (Info-last))))
-                            (setq case-fold-search nil)
-                            (re-search-forward "^\\(.*\\)\\[\\.\\. a b")
-                            (setq calc-summary-indentation
-                                  (- (match-end 1) (match-beginning 1)))))
+                                     (Info-last))))))
+                       (goto-char (point-min))
+                       (setq case-fold-search nil)
+                       (re-search-forward "^\\(.*\\)\\[\\.\\. a b")
+                       (setq calc-summary-indentation
+                             (- (match-end 1) (match-beginning 1)))
                       (goto-char (point-min))
                       (setq target (if (and (string-match "[0-9]\\'" desc)
                                             (not (string-match "[d#]" desc)))