diff -crN oommf12a3/app/pimake/platform.tcl oommf/app/pimake/platform.tcl *** oommf12a3/app/pimake/platform.tcl 2001-01-23 15:21:33.000000000 -0500 --- oommf/app/pimake/platform.tcl 2004-12-17 18:51:36.000000000 -0500 *************** *** 247,252 **** --- 247,256 ---- if {[llength $args]} { return -code error "Expected option, but saw '[lindex $args 0]'" } + # Workaround for ${DBGX} values sprinkled in old broken + # tclConfig.sh and tkConfig.sh files. + regsub -all {\${DBGX}} $linkcmd {} linkcmd + # if {[catch {eval Oc_Exec Foreground $linkcmd} msg]} { global errorCode set ec $errorCode