diff options
| author | suresh <suresh> | 1998-06-23 16:52:44 (GMT) |
|---|---|---|
| committer | suresh <suresh> | 1998-06-23 16:52:44 (GMT) |
| commit | 13d3d8619de3fd760447e51e420766fb5d52f5f0 (patch) | |
| tree | 6946bf73006fd7076150c0729708afdd90b8066f | |
| parent | 58be176ef5ec9249d9d061cad1f0fbfb90cd16c8 (diff) | |
| download | tk-13d3d8619de3fd760447e51e420766fb5d52f5f0.zip tk-13d3d8619de3fd760447e51e420766fb5d52f5f0.tar.gz tk-13d3d8619de3fd760447e51e420766fb5d52f5f0.tar.bz2 | |
Added an additional env. var. ("tk_pkgLibrary") that is searched prior to all
other locations for the "tk.tcl" file. This facilitates application packaging.
| -rw-r--r-- | generic/tkInitScript.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tkInitScript.h b/generic/tkInitScript.h index e86d16e..f46503a 100644 --- a/generic/tkInitScript.h +++ b/generic/tkInitScript.h @@ -33,6 +33,9 @@ static char initScript[] = set tk_library .\n\ }\n\ set dirs {}\n\ + if {[info exists env(tk_pkgLibrary)]} {\n\ + lappend dirs $env(tk_pkgLibrary)\n\ + }\n\ if {[info exists env(TK_LIBRARY)]} {\n\ lappend dirs $env(TK_LIBRARY)\n\ }\n\ |