diff --git a/tcl/CmdUtil.tcl b/tcl/CmdUtil.tcl
index a265427d..70ebff61 100644
--- a/tcl/CmdUtil.tcl
+++ b/tcl/CmdUtil.tcl
@@ -69,7 +69,7 @@ proc show_cmd_args { cmd } {
       }
       set arglist $rest
     } else {
-      report_line $line
+      report_line "$line $arglist"
       break
     }
   }