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 | b52c9a2b4366612102ed299d835e0449d0edbf1b (patch) | |
tree | c7d53d34b39121319f7d27ee0c9cec619568b007 /library/dde | |
parent | 9cb6eb20a290f06006f72f409b1375a6141276ed (diff) | |
download | tcl-b52c9a2b4366612102ed299d835e0449d0edbf1b.zip tcl-b52c9a2b4366612102ed299d835e0449d0edbf1b.tar.gz tcl-b52c9a2b4366612102ed299d835e0449d0edbf1b.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] |