From: Peter Breitenlohner Date: Tue, 11 Mar 2008 21:08:42 +0000 (+0100) Subject: * automake.in (handle_man_pages): Reindent, for next patch. X-Git-Tag: v1.10b~151 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=fafa617086120244fcf2b7acb8ee54d3e8092e83;p=thirdparty%2Fautomake.git * automake.in (handle_man_pages): Reindent, for next patch. --- diff --git a/ChangeLog b/ChangeLog index c22e6b6b0..cbd4f08ac 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2008-03-11 Peter Breitenlohner + + * automake.in (handle_man_pages): Reindent, for next patch. + 2008-03-08 Ralf Wildenhues Use `install' with multiple files at once for some primaries. diff --git a/automake.in b/automake.in index 9612204f8..5cd5eb316 100755 --- a/automake.in +++ b/automake.in @@ -3371,42 +3371,42 @@ sub handle_man_pages my (%sections, %vlist); # We handle nodist_ for uniformity. man pages aren't distributed # by default so it isn't actually very important. - foreach my $pfx ('', 'dist_', 'nodist_') - { - # Add more sections as needed. - foreach my $section ('0'..'9', 'n', 'l') + foreach my $pfx ('', 'dist_', 'nodist_') { - my $varname = $pfx . 'man' . $section . '_MANS'; - if (var ($varname)) + # Add more sections as needed. + foreach my $section ('0'..'9', 'n', 'l') { - $sections{$section} = 1; - $varname = '$(' . $varname . ')'; - $vlist{$varname} = 1; + my $varname = $pfx . 'man' . $section . '_MANS'; + if (var ($varname)) + { + $sections{$section} = 1; + $varname = '$(' . $varname . ')'; + $vlist{$varname} = 1; - &push_dist_common ($varname) - if $pfx eq 'dist_'; + &push_dist_common ($varname) + if $pfx eq 'dist_'; + } } - } - my $varname = $pfx . 'man_MANS'; - my $var = var ($varname); - if ($var) - { - foreach ($var->value_as_list_recursive) + my $varname = $pfx . 'man_MANS'; + my $var = var ($varname); + if ($var) { - # A page like `foo.1c' goes into man1dir. - if (/\.([0-9a-z])([a-z]*)$/) + foreach ($var->value_as_list_recursive) { - $sections{$1} = 1; + # A page like `foo.1c' goes into man1dir. + if (/\.([0-9a-z])([a-z]*)$/) + { + $sections{$1} = 1; + } } - } - $varname = '$(' . $varname . ')'; - $vlist{$varname} = 1; - &push_dist_common ($varname) - if $pfx eq 'dist_'; + $varname = '$(' . $varname . ')'; + $vlist{$varname} = 1; + &push_dist_common ($varname) + if $pfx eq 'dist_'; + } } - } return unless %sections;