diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2004-05-18 12:28:40 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2004-05-18 12:28:40 (GMT) |
| commit | ed17621baeb45319b311dda8072998d0f8b3fd45 (patch) | |
| tree | f2d9573d38cfec1ccab74708c4ff275758102325 /tools/index.tcl | |
| parent | f5104d2203876e2a9cfa961aaa04abd6973c44ce (diff) | |
| download | tcl-ed17621baeb45319b311dda8072998d0f8b3fd45.zip tcl-ed17621baeb45319b311dda8072998d0f8b3fd45.tar.gz tcl-ed17621baeb45319b311dda8072998d0f8b3fd45.tar.bz2 | |
More adaptations to understand .SS macros.
Diffstat (limited to 'tools/index.tcl')
| -rw-r--r-- | tools/index.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/index.tcl b/tools/index.tcl index 26e4386..b39f7ca 100644 --- a/tools/index.tcl +++ b/tools/index.tcl @@ -9,7 +9,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: index.tcl,v 1.4 2003/06/04 23:40:18 mistachkin Exp $ +# RCS: @(#) $Id: index.tcl,v 1.5 2004/05/18 12:28:40 dkf Exp $ # # Global variables used by these scripts: @@ -133,7 +133,7 @@ proc text string { proc macro {name args} { switch $name { - SH { + SH - SS { global state switch $args { |