From: oharboe Date: Fri, 11 Jul 2008 17:46:17 +0000 (+0000) Subject: search help text too X-Git-Tag: v0.1.0~502 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=94966bf2e3933e308f3093a3fbf403ab83331ac5;p=openocd search help text too git-svn-id: svn://svn.berlios.de/openocd/trunk@795 b42882b7-edfa-0310-969c-e2dbd0fdcd60 --- diff --git a/src/startup.tcl b/src/startup.tcl index 06d2eb14..1b5092e0 100644 --- a/src/startup.tcl +++ b/src/startup.tcl @@ -68,7 +68,7 @@ proc tcl_help {args} { global ocd_helptext set cmd $args foreach a [lsort $ocd_helptext] { - if {[string length $cmd]==0||[string first $cmd $a]!=-1} { + if {[string length $cmd]==0||[string first $cmd $a]!=-1||[string first $cmd [lindex $a 1]]!=-1} { set w 40 set cmdname [lindex $a 0] set h [lindex $a 1]