fix

2007-03-31 06:56:52 +00:00 · 2007-03-31 06:56:52 +00:00 · 67cdde0327
parent d73eb7d9b2
commit 67cdde0327
1 changed files with 1 additions and 1 deletions
--- a/2
+++ b/2
@ -7,7 +7,7 @@ my $section=shift;
 print ".TH $prog $section\n";

 while (<>) {
-	s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]])?\]\]}{$1 ? "[[$2]]" : $2}eg;
+	s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]]+)?\]\]}{$1 ? "[[$2]]" : $2}eg;
 	if (/^#\s/) {
 		s/^#\s/.SH /;
 		<>; # blank;