# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1102393468 0
# Node ID b6f65248543d9f4c7586293a7d3f5e6b5acb25c4
# Parent  9fcc0f024a83d223dc1348288b9c6bfdd4406fe7
Set calc-summary-indentation even when Calc Summary buffer exists.

diff -r 9fcc0f024a83 -r b6f65248543d lisp/calc/calc-help.el
--- a/lisp/calc/calc-help.el	Tue Dec 07 00:58:02 2004 +0000
+++ b/lisp/calc/calc-help.el	Tue Dec 07 04:24:28 2004 +0000
@@ -186,11 +186,12 @@
 				 (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)))