* library/dde/pkgIndex.tcl:

	* library/reg/pkgIndex.tcl: Changed the hardwired debug suffix
	  (d) to the correct suffix (g).

3 files changed, 8 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index 213b218..18a9293 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2002-10-28  Andreas Kupries  <andreask@activestate.com>
+
+	* library/dde/pkgIndex.tcl:
+	* library/reg/pkgIndex.tcl: Changed the hardwired debug suffix
+	  (d) to the correct suffix (g).
+
 2002-10-28  Don Porter  <dgp@users.sourceforge.net>
 
 	* library/auto.tcl:	Converted the Mac-specific [package unknown]
diff --git a/library/dde/pkgIndex.tcl b/library/dde/pkgIndex.tcl
index f045ad8..9efa425 100644
--- a/library/dde/pkgIndex.tcl
+++ b/library/dde/pkgIndex.tcl
@@ -1,6 +1,6 @@
 if {![package vsatisfies [package provide Tcl] 8]} {return}
 if {[info exists tcl_platform(debug)]} {
-    package ifneeded dde 1.2 [list load [file join $dir tcldde12d.dll] dde]
+    package ifneeded dde 1.2 [list load [file join $dir tcldde12g.dll] dde]
 } else {
     package ifneeded dde 1.2 [list load [file join $dir tcldde12.dll] dde]
 }
diff --git a/library/reg/pkgIndex.tcl b/library/reg/pkgIndex.tcl
index 9b2b4f3..70411e9 100755
--- a/library/reg/pkgIndex.tcl
+++ b/library/reg/pkgIndex.tcl
@@ -1,7 +1,7 @@
 if {![package vsatisfies [package provide Tcl] 8]} {return}
 if {[info exists tcl_platform(debug)]} {
     package ifneeded registry 1.1 \
-            [list load [file join $dir tclreg11d.dll] registry]
+            [list load [file join $dir tclreg11g.dll] registry]
 } else {
     package ifneeded registry 1.1 \
             [list load [file join $dir tclreg11.dll] registry]