Index: common.scm
==================================================================
--- common.scm
+++ common.scm
@@ -2135,13 +2135,13 @@
          (fullcmd  (if (or pre-cmd post-cmd)
                        (conc pre-cmd cmd post-cmd)
                        (conc "viewscreen " cmd))))
     (debug:print-info 02 *default-log-port* "Running command: " fullcmd)
     (cond
-     (with-vars     (common:without-vars cmd))
-     (with-orig-env (common:with-orig-env cmd))
-     (else          (common:without-vars fullcmd "MT_.*")))))
+     (with-vars     (common:without-vars  fullcmd))
+     (with-orig-env (common:with-orig-env fullcmd))
+     (else          (common:without-vars  fullcmd "MT_.*")))))
 		  
 ;;======================================================================
 ;; T I M E   A N D   D A T E
 ;;======================================================================