Don't put backslashes before the dashes in " -- ".

b6855ddc · Wayne Davison · 0cbb958f · b6855ddc
Commit b6855ddc authored Oct 27, 2006 by Wayne Davison
Show whitespace changes
Inline Side-by-side

Showing with 1 addition and 2 deletions

tweak_manpage tweak_manpage +1 -2

No files found.
--- a/tweak_manpage
+++ b/tweak_manpage
 #!/usr/bin/perl -i -p
 s{(--\w[-\w]+)}{ $x = $1; $x =~ s/-/\\-/g; $x }eg;
 s/(?<!\\)-(['"\d*])/\\-$1/g;
-s/ -- / \\-\\- /g;
-s#(['"(= /,])-#$1\\-#g;
+s#(['"(= /,])-(?!-)#$1\\-#g;
 s/(\\fB)-/$1\\-/g;
 s/(\[\w)-(\w\])/$1\\-$2/g;
 s{(\\f\(CW.*?\\fP)}{ $x = $1; $x =~ s/(?<!\\)-/\\-/g; $x }eg;