Mercurial > emacs

comparison lisp/progmodes/tcl.el @ 50856:2aec3e4bf957

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tcl-explain-indentation): Don't quote nil and t in docstrings.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 06 May 2003 17:39:21 +0000
parents ce81e48eab6e
children 5dbeffb17d8e
comparison
equal deleted inserted replaced
50855:31ce4fcda3d8 50856:2aec3e4bf957
4 4
5 ;; Maintainer: FSF 5 ;; Maintainer: FSF
6 ;; Author: Tom Tromey <tromey@redhat.com> 6 ;; Author: Tom Tromey <tromey@redhat.com>
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.71 $ 9 ;; Version: $Revision: 1.72 $
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
435 This means that the \"loop\" command has three arguments. The first 435 This means that the \"loop\" command has three arguments. The first
436 argument is ignored (for indentation purposes). The second argument 436 argument is ignored (for indentation purposes). The second argument
437 is a Tcl expression, and the last argument is Tcl commands.") 437 is a Tcl expression, and the last argument is Tcl commands.")
438 438
439 (defvar tcl-explain-indentation nil 439 (defvar tcl-explain-indentation nil
440 "If not `nil', debugging message will be printed during indentation.") 440 "If non-nil, debugging message will be printed during indentation.")
441 441
442 442
443 443
444 ;; Here's another stab. I think this one actually works. 444 ;; Here's another stab. I think this one actually works.
445 ;; We have to be careful that the open-brace following this regexp 445 ;; We have to be careful that the open-brace following this regexp