1 files changed, 14 insertions, 0 deletions
diff --git a/ds9/library/3d.tcl b/ds9/library/3d.tcl
index 9e9f04a..9b258ec 100644
--- a/ds9/library/3d.tcl
+++ b/ds9/library/3d.tcl
@@ -462,6 +462,20 @@ proc PrefsDialog3d {} {
 
 proc Process3DCmd {varname iname} {
     upvar $varname var
+    upvar $iname ii
+
+    global threed
+ 
+    3DDialog
+
+    threed::YY_FLUSH_BUFFER
+    threed::yy_scan_string [lrange $var $ii end]
+    threed::yyparse
+    incr ii [expr $threed::yycnt-1]
+}
+
+proc oProcess3DCmd {varname iname} {
+    upvar $varname var
     upvar $iname i
 
     global threed