aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2010-11-11 10:45:39 +1000
committerSteve Bennett <steveb@workware.net.au>2010-11-11 10:45:39 +1000
commita774cd20ded2d629ae1a0fd8bd0b44bbc6262ae0 (patch)
tree51349989e1f3048f08ddd95a7b26a29a9c8095c8
parent5a9c9cdc1a0add1d0e6e63e64d5d7d7febc6d749 (diff)
downloadjimtcl-a774cd20ded2d629ae1a0fd8bd0b44bbc6262ae0.zip
jimtcl-a774cd20ded2d629ae1a0fd8bd0b44bbc6262ae0.tar.gz
jimtcl-a774cd20ded2d629ae1a0fd8bd0b44bbc6262ae0.tar.bz2
Some people still only have Tcl 8.4
Signed-off-by: Steve Bennett <steveb@workware.net.au>
-rwxr-xr-xmake-index2
1 files changed, 1 insertions, 1 deletions
diff --git a/make-index b/make-index
index 944d94e..37eda49 100755
--- a/make-index
+++ b/make-index
@@ -1,7 +1,7 @@
#!/usr/bin/env tclsh
# vim:se syn=tcl:
-lassign $argv filename
+set filename [lindex $argv 0]
set f [open $filename]
while {[gets $f buf] >= 0} {