From 6a4384e6bc07c9531cbb5730c6f977d75aa6c11e Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 4 Jun 2000 22:01:03 +0000 Subject: [PATCH] (tcl-indent-for-comment): Ignore comment-indent-hook. --- lisp/progmodes/tcl.el | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/lisp/progmodes/tcl.el b/lisp/progmodes/tcl.el index f0654f68721..835c08ab63e 100644 --- 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 ;; Author: Tom Tromey ;; Chris Lindblad ;; 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 ") ;; @@ -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)))) -- 2.11.4.GIT