diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2003-03-23 01:39:03 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2003-03-23 01:39:03 (GMT) |
| commit | 3684e49b82a368b15b2ceffd7d0bf4a49c076097 (patch) | |
| tree | c7d53d34b39121319f7d27ee0c9cec619568b007 /library/dde | |
| parent | 529b9d8f7482169a6dd1abab4f664386b5e077a4 (diff) | |
| download | tcl-3684e49b82a368b15b2ceffd7d0bf4a49c076097.zip tcl-3684e49b82a368b15b2ceffd7d0bf4a49c076097.tar.gz tcl-3684e49b82a368b15b2ceffd7d0bf4a49c076097.tar.bz2 | |
Fixed a bug where [package require dde] or [package require registry]
attempted to load the release version of the DLL into a debug
build. [Bug 708218] Thanks to Joe Mistachkin for the patch.
Diffstat (limited to 'library/dde')
| -rw-r--r-- | library/dde/pkgIndex.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/dde/pkgIndex.tcl b/library/dde/pkgIndex.tcl index b651038..49201f4 100644 --- a/library/dde/pkgIndex.tcl +++ b/library/dde/pkgIndex.tcl @@ -1,5 +1,5 @@ if {![package vsatisfies [package provide Tcl] 8]} {return} -if {[info exists tcl_platform(debug)]} { +if {[info exists ::tcl_platform(debug)]} { package ifneeded dde 1.2.1 [list load [file join $dir tcldde12g.dll] dde] } else { package ifneeded dde 1.2.1 [list load [file join $dir tcldde12.dll] dde] |