diff options
author | hypnotoad <yoda@etoyoc.com> | 2015-03-17 01:07:44 (GMT) |
---|---|---|
committer | hypnotoad <yoda@etoyoc.com> | 2015-03-17 01:07:44 (GMT) |
commit | e448db56ee02e80b29e2fc3c2d07313e592ba554 (patch) | |
tree | 64a7f7211ec4287666cf933e36b1f49a18251a12 /tools | |
parent | 339d4879a0296e5e2ecaf532a42e3c6b8d4d5cc2 (diff) | |
parent | 74708147baa286b9ee3e7d6c5796b082f3758a1e (diff) | |
download | tcl-e448db56ee02e80b29e2fc3c2d07313e592ba554.zip tcl-e448db56ee02e80b29e2fc3c2d07313e592ba554.tar.gz tcl-e448db56ee02e80b29e2fc3c2d07313e592ba554.tar.bz2 |
Checkpointing the core_zip_vfs branch against the lastest release
Diffstat (limited to 'tools')
-rwxr-xr-x | tools/tcltk-man2html.tcl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tools/tcltk-man2html.tcl b/tools/tcltk-man2html.tcl index 89e8e5c..1ceceb9 100755 --- a/tools/tcltk-man2html.tcl +++ b/tools/tcltk-man2html.tcl @@ -667,7 +667,11 @@ try { # ... but try to extract (name, version) from subdir contents try { - set f [open [file join $pkgsDir $dir configure.in]] + try { + set f [open [file join $pkgsDir $dir configure.in]] + } trap {POSIX ENOENT} {} { + set f [open [file join $pkgsDir $dir configure.ac]] + } foreach line [split [read $f] \n] { if {2 == [scan $line \ { AC_INIT ( [%[^]]] , [%[^]]] ) } n v]} { |