diff options
author | dgp <dgp@users.sourceforge.net> | 2012-01-27 18:39:05 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2012-01-27 18:39:05 (GMT) |
commit | eecbae58f19a613410dd935f95599da7cf377e6d (patch) | |
tree | b0cb730b5d6c7990e51af4cc7ce73e3af1911b83 /library/package.tcl | |
parent | 2082b1ef56eb015bfbdfd99bd2c7173346d80372 (diff) | |
download | tcl-eecbae58f19a613410dd935f95599da7cf377e6d.zip tcl-eecbae58f19a613410dd935f95599da7cf377e6d.tar.gz tcl-eecbae58f19a613410dd935f95599da7cf377e6d.tar.bz2 |
3480599 Make [source] and [load] order of multi-file package happen in sorted
order of the file names.
Diffstat (limited to 'library/package.tcl')
-rw-r--r-- | library/package.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/package.tcl b/library/package.tcl index dc06641..3831822 100644 --- a/library/package.tcl +++ b/library/package.tcl @@ -393,7 +393,7 @@ proc pkg_mkIndex {args} { break } lappend cmd ::tcl::Pkg::Create -name $name -version $version - foreach spec $files($pkg) { + foreach spec [lsort -index 0 $files($pkg)] { foreach {file type procs} $spec { if { $direct } { set procs {} |