|
From: Donald G P. <dg...@ni...> - 2005-01-25 16:58:26
|
> I don't like it because you are forcing an error situation
> every time that pkgIndex.tcl is hit.
Agreed. Here's the improved index script:
if {![package vsatisfies [package provide Tcl] 8.5]} {return}
if {[package provide Tk] eq ""} {return}
if {![package vsatisfies [package provide Tk] 8.5]} {return}
if {[tk windowingsystem] ne "x11"} {return}
package ifneeded Tile 0.5 [list load [file join $dir libtile.so]]
I'd like it better if [package present] had a more sensible
interface. But it doesn't. A [package vsatisfies] that
didn't error on a "" argument might help out as well.
| Don Porter Mathematical and Computational Sciences Division |
| don...@ni... Information Technology Laboratory |
| http://math.nist.gov/~DPorter/ NIST |
|______________________________________________________________________|
|