* automake.in (handle_man_pages): Reindent, for next patch.

diff --git a/ChangeLog b/ChangeLog
index c22e6b6..cbd4f08 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-11  Peter Breitenlohner  <peb@mppmu.mpg.de>
+
+       * automake.in (handle_man_pages): Reindent, for next patch.
+
 2008-03-08  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 
        Use `install' with multiple files at once for some primaries.

diff --git a/automake.in b/automake.in
index 9612204..5cd5eb3 100755 (executable)
--- 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;