# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 974214580 0
# Node ID decc878ec612f1cdc8cf87e8cfbb3a54328d932b
# Parent  e64bda3bd077ed7c88d8eb9a40b3dc10ac0882ef
(comment-indent): Paren typo.

diff -r e64bda3bd077 -r decc878ec612 lisp/newcomment.el
--- a/lisp/newcomment.el	Tue Nov 14 14:41:51 2000 +0000
+++ b/lisp/newcomment.el	Tue Nov 14 15:09:40 2000 +0000
@@ -6,7 +6,7 @@
 ;; Maintainer: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: comment uncomment
 ;; Version: $Name:  $
-;; Revision: $Id: newcomment.el,v 1.22 2000/10/08 19:07:41 monnier Exp $
+;; Revision: $Id: newcomment.el,v 1.23 2000/11/14 10:03:56 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -444,14 +444,15 @@
 	      ;; If that's different from current, change it.
 	      (skip-chars-backward " \t")
 	      (delete-region (point) begpos)
-	      (indent-to (if (bolp) indent (max indent (1+ (current-column))))))
-	    ;; An existing comment?
-	    (if cpos
-		(progn (goto-char cpos) (set-marker cpos nil))
-	      ;; No, insert one.
-	      (insert starter)
-	      (save-excursion
-		(insert ender)))))))))
+	      (indent-to (if (bolp) indent
+			   (max indent (1+ (current-column)))))))
+	  ;; An existing comment?
+	  (if cpos
+	      (progn (goto-char cpos) (set-marker cpos nil))
+	    ;; No, insert one.
+	    (insert starter)
+	    (save-excursion
+	      (insert ender))))))))
 
 ;;;###autoload
 (defun comment-set-column (arg)