diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-07-17 08:01:11 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-07-17 08:01:11 (GMT) |
commit | 94e285cad09f37ba982d10d920ead9ed582bab4f (patch) | |
tree | 96894fa8ba74642b9557725b7dc5f4f2568a8527 | |
parent | ba36e5644b01038e11624290850803281b18ece1 (diff) | |
download | tcl-94e285cad09f37ba982d10d920ead9ed582bab4f.zip tcl-94e285cad09f37ba982d10d920ead9ed582bab4f.tar.gz tcl-94e285cad09f37ba982d10d920ead9ed582bab4f.tar.bz2 |
Fix [fb2208172c671f29d60e9ac928d9ded45d01d8b8|fb2208172c]: tclIndex varies across builds from auto_mkindex
-rw-r--r-- | library/auto.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/auto.tcl b/library/auto.tcl index ec680de..6cb09b6 100644 --- a/library/auto.tcl +++ b/library/auto.tcl @@ -211,7 +211,7 @@ proc auto_mkindex {dir args} { } auto_mkindex_parser::init - foreach file [glob -- {*}$args] { + foreach file [lsort [glob -- {*}$args]] { if {[catch {auto_mkindex_parser::mkindex $file} msg opts] == 0} { append index $msg } else { @@ -244,7 +244,7 @@ proc auto_mkindex_old {dir args} { if {[llength $args] == 0} { set args *.tcl } - foreach file [glob -- {*}$args] { + foreach file [lsort [glob -- {*}$args]] { set f "" set error [catch { set f [open $file] |