From: oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60>
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://review.openocd.org/gitweb?p=openocd.git;a=commitdiff_plain;h=94966bf2e3933e308f3093a3fbf403ab83331ac5

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 06d2eb1409..1b5092e0a7 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]