comparison lisp/progmodes/tcl.el @ 12644:35800a352783

Doc fixes.
author Tom Tromey <tromey@redhat.com>
date Sun, 23 Jul 1995 20:26:47 +0000
parents 1e667d64128a
children 3ce3ca90e4a3
comparison
equal deleted inserted replaced
12643:45ada337053e 12644:35800a352783
4 4
5 ;; Maintainer: Tom Tromey <tromey@busco.lanl.gov> 5 ;; Maintainer: Tom Tromey <tromey@busco.lanl.gov>
6 ;; Author: Tom Tromey <tromey@busco.lanl.gov> 6 ;; Author: Tom Tromey <tromey@busco.lanl.gov>
7 ;; Chris Lindblad <cjl@lcs.mit.edu> 7 ;; Chris Lindblad <cjl@lcs.mit.edu>
8 ;; Keywords: languages tcl modes 8 ;; Keywords: languages tcl modes
9 ;; Version: $Revision: 1.42 $ 9 ;; Version: $Revision: 1.43 $
10 10
11 ;; This file is part of GNU Emacs. 11 ;; This file is part of GNU Emacs.
12 12
13 ;; GNU Emacs is free software; you can redistribute it and/or modify 13 ;; GNU Emacs is free software; you can redistribute it and/or modify
14 ;; it under the terms of the GNU General Public License as published by 14 ;; it under the terms of the GNU General Public License as published by
49 ;;; Commentary: 49 ;;; Commentary:
50 50
51 ;; LCD Archive Entry: 51 ;; LCD Archive Entry:
52 ;; tcl|Tom Tromey|tromey@busco.lanl.gov| 52 ;; tcl|Tom Tromey|tromey@busco.lanl.gov|
53 ;; Major mode for editing Tcl| 53 ;; Major mode for editing Tcl|
54 ;; $Date: 1995/07/17 19:55:25 $|$Revision: 1.42 $|~/modes/tcl.el.Z| 54 ;; $Date: 1995/07/17 19:59:49 $|$Revision: 1.43 $|~/modes/tcl.el.Z|
55 55
56 ;; CUSTOMIZATION NOTES: 56 ;; CUSTOMIZATION NOTES:
57 ;; * tcl-proc-list can be used to customize a list of things that 57 ;; * tcl-proc-list can be used to customize a list of things that
58 ;; "define" other things. Eg in my project I put "defvar" in this 58 ;; "define" other things. Eg in my project I put "defvar" in this
59 ;; list. 59 ;; list.
63 ;; * tcl-type-alist can be used to minimally customize indentation 63 ;; * tcl-type-alist can be used to minimally customize indentation
64 ;; according to context. 64 ;; according to context.
65 65
66 ;; Change log: 66 ;; Change log:
67 ;; $Log: tcl.el,v $ 67 ;; $Log: tcl.el,v $
68 ;; Revision 1.43 1995/07/17 19:59:49 tromey
69 ;; (inferior-tcl-mode): Use modeline-process if it exists.
70 ;;
68 ;; Revision 1.42 1995/07/17 19:55:25 tromey 71 ;; Revision 1.42 1995/07/17 19:55:25 tromey
69 ;; XEmacs currently must use tcl-internal-end-of-defun 72 ;; XEmacs currently must use tcl-internal-end-of-defun
70 ;; 73 ;;
71 ;; Revision 1.41 1995/07/14 21:54:56 tromey 74 ;; Revision 1.41 1995/07/14 21:54:56 tromey
72 ;; Changes to make menus work in XEmacs. 75 ;; Changes to make menus work in XEmacs.
337 (if (and (string-match "19\\." emacs-version) 340 (if (and (string-match "19\\." emacs-version)
338 (not (string-match "XEmacs" emacs-version))) 341 (not (string-match "XEmacs" emacs-version)))
339 (require 'imenu)) 342 (require 'imenu))
340 ())) 343 ()))
341 344
342 (defconst tcl-version "$Revision: 1.42 $") 345 (defconst tcl-version "$Revision: 1.43 $")
343 (defconst tcl-maintainer "Tom Tromey <tromey@drip.colorado.edu>") 346 (defconst tcl-maintainer "Tom Tromey <tromey@drip.colorado.edu>")
344 347
345 ;; 348 ;;
346 ;; User variables. 349 ;; User variables.
347 ;; 350 ;;
377 19 (the fast function is always used elsewhere).") 380 19 (the fast function is always used elsewhere).")
378 381
379 (defvar tcl-electric-hash-style 'smart 382 (defvar tcl-electric-hash-style 'smart
380 "*Style of electric hash insertion to use. 383 "*Style of electric hash insertion to use.
381 Possible values are 'backslash, meaning that `\\' quoting should be 384 Possible values are 'backslash, meaning that `\\' quoting should be
382 done; `quote, meaning that `\"' quoting should be done; 'smart, 385 done; 'quote, meaning that `\"' quoting should be done; 'smart,
383 meaning that the choice between 'backslash and 'quote should be 386 meaning that the choice between 'backslash and 'quote should be
384 made depending on the number of hashes inserted; or nil, meaning that 387 made depending on the number of hashes inserted; or nil, meaning that
385 no quoting should be done. Any other value for this variable is 388 no quoting should be done. Any other value for this variable is
386 taken to mean 'smart. The default is 'smart.") 389 taken to mean 'smart. The default is 'smart.")
387 390
897 tcl-electric-hash-style 900 tcl-electric-hash-style
898 Controls action of `#' key. 901 Controls action of `#' key.
899 tcl-use-hairy-comment-detector 902 tcl-use-hairy-comment-detector
900 If t, use more complicated, but slower, comment detector. 903 If t, use more complicated, but slower, comment detector.
901 This variable is only used in GNU Emacs 19. 904 This variable is only used in GNU Emacs 19.
905 tcl-use-smart-word-finder
906 If not nil, use a smarter, Tcl-specific way to find the current
907 word when looking up help on a Tcl command.
902 908
903 Turning on Tcl mode calls the value of the variable `tcl-mode-hook' 909 Turning on Tcl mode calls the value of the variable `tcl-mode-hook'
904 with no args, if that value is non-nil. Read the documentation for 910 with no args, if that value is non-nil. Read the documentation for
905 `tcl-mode-hook' to see what kinds of interesting hook functions 911 `tcl-mode-hook' to see what kinds of interesting hook functions
906 already exist. 912 already exist.