Merge pull request #468 from sm-shaw/467

Fix for Issue #467 CLI myerrproc and remote_command opmode
TPC-Council · Dec 7, 2022 · a8543ef · a8543ef
2 parents 7e23d83 + 2f41c6a
commit a8543ef
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/generic/gencli.tcl b/src/generic/gencli.tcl
@@ -199,7 +199,7 @@ proc myerrorproc { id info } {
         } else {
             if { [ info exists threadsbytid($id) ] } {
                 set vuser [expr $threadsbytid($id) + 1]
-                set info "Error in Virtual User [$vuser]: $info"
+                set info "Error in Virtual User $vuser: $info"
                 putscli $info
                 hdbjobs eval {INSERT INTO JOBOUTPUT VALUES($jobid, $vuser, $info)}
             }  else {

diff --git a/src/generic/genmodes.tcl b/src/generic/genmodes.tcl
@@ -467,7 +467,7 @@ proc distribute { } {
 }
 
 proc remote_command { command } {
-    upvar 1 opmode opmode
+    upvar #0 opmode opmode
     global masterlist
     if { $opmode eq "Primary" } {
         foreach f $masterlist {