(tcl-indent-for-comment): Ignore comment-indent-hook.

diff --git a/lisp/progmodes/tcl.el b/lisp/progmodes/tcl.el
index f0654f68721cd9c82f7bb348438ad4430b7d8182..835c08ab63e75f056c3657ed9294a3da2fe2738b 100644 (file)
--- a/lisp/progmodes/tcl.el
+++ b/lisp/progmodes/tcl.el
@@ -1,12 +1,12 @@
 ;; tcl.el --- Tcl code editing commands for Emacs
 
-;; Copyright (C) 1994, 1998, 1999 Free Software Foundation, Inc.
+;; Copyright (C) 1994, 1998, 1999, 2000  Free Software Foundation, Inc.
 
 ;; Maintainer: Tom Tromey <tromey@busco.lanl.gov>
 ;; Author: Tom Tromey <tromey@busco.lanl.gov>
 ;;    Chris Lindblad <cjl@lcs.mit.edu>
 ;; Keywords: languages tcl modes
-;; Version: $Revision: 1.59 $
+;; Version: $Revision: 1.60 $
 
 ;; This file is part of GNU Emacs.
 
@@ -127,7 +127,7 @@
           (require 'imenu))
        ()))
 
-(defconst tcl-version "$Revision: 1.59 $")
+(defconst tcl-version "$Revision: 1.60 $")
 (defconst tcl-maintainer "Tom Tromey <tromey@drip.colorado.edu>")
 
 ;;
@@ -1872,9 +1872,7 @@ Parts of this were taken from `indent-for-comment'."
                (backward-char))))))
   ;; Point is just after the "#" starting a comment.  Move it as
   ;; appropriate.
-  (let* ((indent (if comment-indent-hook
-                    (funcall comment-indent-hook)
-                  (funcall comment-indent-function)))
+  (let* ((indent (funcall comment-indent-function))
         (begpos (progn
                   (backward-char)
                   (point))))