X-Git-Url: http://www.privoxy.org/gitweb/?p=privoxy.git;a=blobdiff_plain;f=utils%2Fprepare-configfile.pl;h=dc68632b82c2006033cc10bd767f16afa69b96c8;hp=f7483a4703ae43746e61c887941f7a15b1199965;hb=32ba28b1225c54c850c48814b018e7afcffbd0a5;hpb=42bad77dc1bc7d6b13f3cec744c62e27a524cb05 diff --git a/utils/prepare-configfile.pl b/utils/prepare-configfile.pl index f7483a47..dc68632b 100755 --- a/utils/prepare-configfile.pl +++ b/utils/prepare-configfile.pl @@ -31,7 +31,10 @@ sub main() { s/^1\. \@\@TITLE\@\@/ /i; - if (m/^(\d*\.){1,3}\s/) { + if ($hit_header) { + $header_len += length($_); + $_ = " " . $_; + } elsif (m/^(\d*\.){1,3}\s/) { # Remove the first digit as it's the # config file section in the User Manual. s/^(\d\.)//; @@ -48,9 +51,17 @@ sub main() { s/^\s+/ /; $unfold_mode = 0; } else { + if ( $hit_option ) { + # processing a continuation of a @@ line + if ( /^\s*$/ ) { # blank line + $hit_option = 0; + next; + } + } s/^/# /; } - if ($unfolding_enabled and m/(\s+#)\s*$/) { + if ($unfolding_enabled and + (m/(\s+#)\s*$/ or m/forward-socks5 and$/)) { $unfold_mode = 1; chomp; } @@ -58,8 +69,6 @@ sub main() { # XXX: someone should figure out what this stuff # is supposed to do (and if it really does that). s/^# #/####/ if /^# #{12,}/; - s/^.*$// if $hit_option; - $hit_option = 0; s/^\n//; s/^#\s*-{20,}//; s/ *$//; @@ -72,12 +81,13 @@ sub main() { print unless (/^\s*$/); - if ($hit_header) { + if ($hit_header and !$unfold_mode) { # The previous line was a section # header so we better underline it. die "Invalid header length" unless defined $header_len; print "# " . "=" x $header_len . "\n"; $hit_header = 0; + $header_len = 0; }; } }