 
 (defun tcl-enhance-indentation () 
   ;; Fix the binding of TAB to the normal, std. value.
-  (define-key tcl-mode-map "\t" 'indent-for-tab-command)
+  (global-set-key [tab] 'indent-for-tab-command)
   (set (make-local-variable 'indent-line-function) 
        'tcl-indent-command-toggler)
   )
+(remove-hook 'tcl-mode-hook 'tcl-enhance-indentation)
 (add-hook 'tcl-mode-hook 'tcl-enhance-indentation)
 
 

They may be added at a later date.
{jpw: 6/05}")

  ) ;; End: Required `eval-and-compile' 


;;------------------------------------------------------------

;; 


(defvar tcl-font-lock-keywords-enhanced nil
  "Enhancements for the standard `tcl-font-lock-keywords' variable.
{jpw: 06/05}")
;; Separate out the defvar from setting the value to make debugging easier.
(setq tcl-font-lock-keywords-enhanced
  (eval-when-compile
    (list
     ;;
