make syntax errors respond with 'usage'
[fw/openocd] / src / helper / startup.tcl
index dda89c8adc6cccf09f2c427d1dff99159aae0076..d1c73ef3f2a188f1e05d91dd7393bda8f4cf94cb 100644 (file)
@@ -25,7 +25,7 @@ proc ocd_bouncer {name args} {
                        set errmsg "Command handler execution failed"
                }
        } else {if {$type == "group"} {
-               catch {eval ocd_help $name $args}
+               catch {eval ocd_usage $name $args}
                set errmsg [format "%s: command requires more arguments" \
                        [concat $name " " $args]]
        } else {