• fixed function parameter tooltip invoked by typing "(" to parse cor…

…rectly and avoid the output of entire HTML code if parsing failed git-svn-id: http://svn.textmate.org/trunk/Bundles/R.tmbundle@12051 dfb7d73b-c2ec-0310-8fea-fb051d288c6d
textmate · Sep 8, 2011 · 0dac9c9 · 0dac9c9
1 parent 21c9384
commit 0dac9c9
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/Support/bin/parseHTMLForUsage.sh b/Support/bin/parseHTMLForUsage.sh
@@ -10,13 +10,15 @@ undef($/);
 $w=$ENV{"WORD"};
 $f=$ENV{"FLAG"};
 $a=<>;
-$a=~s!.*?<h.>Usage</h.>\s*<pre>[^>]*?($w\([^>]*?\))\n.*?</pre>.*!$1!ms;
+$a=~s!.*?<h.>Usage</h.>\s*<pre>[^>]*?($w\([^>]*?\)).*?\n.*?</pre>.*!$1!ms;
 $a=~s/"\t"/"\\t"/sg;
 $a=~s/"\n"/"\\n"/sg;
 if($f) {
 	$a=~s/\n//sg;
 	$a=~s/^$w//ms;
 	$a="" if($a!~m/^\(.*\)$/);
 }
-print $a;
+if($a!~m/^</) {
+	print $a;
+}
 '