texinfo/tp/Texinfo Parser.pm

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        13/02/02 13:53:20

Modified files:
        tp/Texinfo     : Parser.pm 

Log message:
        Reindent.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Parser.pm?cvsroot=texinfo&r1=1.421&r2=1.422

Patches:
Index: Parser.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Parser.pm,v
retrieving revision 1.421
retrieving revision 1.422
diff -u -b -r1.421 -r1.422
--- Parser.pm   30 Jan 2013 00:54:31 -0000      1.421
+++ Parser.pm   2 Feb 2013 13:53:19 -0000       1.422
@@ -1587,7 +1587,7 @@
               }
             }
             if ($empty_format) {
-              $self->line_warn (sprintf($self->__("address@hidden has text but 
no address@hidden"),
+              $self->line_warn(sprintf($self->__("address@hidden has text but 
no address@hidden"),
                                         $current->{'cmdname'}), 
$current->{'line_nr'});                       
             }
           }
@@ -1742,7 +1742,7 @@
     #$self->_close_command_cleanup($current);
     $current = $current->{'parent'};
   } elsif ($closed_command) {
-    $self->line_error (sprintf($self->__("Unmatched `%c%s'"), 
+    $self->line_error(sprintf($self->__("Unmatched `%c%s'"), 
                        ord('@'), "end $closed_command"), $line_nr);
   }
   return ($closed_element, $current);
@@ -1972,7 +1972,8 @@
           } else {
             # implicit quoting when there is one argument.
             if ($args_total != 1) {
-              $self->line_error (sprintf($self->__("Macro `%s' called with too 
many args"), 
+              $self->line_error(sprintf($self->__(
+                                     "Macro `%s' called with too many args"), 
                                 $name), $line_nr);
             }
             $arguments->[-1] .= ',';
@@ -1994,14 +1995,14 @@
 
       ($line, $line_nr) = _new_line($self, $line_nr, $macro);
       if (!defined($line)) {
-        $self->line_error (sprintf($self->__("address@hidden missing close 
brace"), 
+        $self->line_error(sprintf($self->__("address@hidden missing close 
brace"), 
            $name), $line_nr_orig);
         return ($arguments, "\n", $line_nr);
       }
     }
   }
   if ($args_total == 0 and $arguments->[0] =~ /\S/) {
-    $self->line_error (sprintf($self->__("Macro `%s' declared without argument 
called with an argument"), 
+    $self->line_error(sprintf($self->__("Macro `%s' declared without argument 
called with an argument"), 
                                 $name), $line_nr);
   }
   print STDERR "END MACRO ARGS EXPANSION(".scalar(@$arguments)."): ".
@@ -2035,7 +2036,8 @@
         if (defined($args_index->{$arg})) {
           $result .= $args->[$args_index->{$arg}];
         } else {
-          $self->line_error (sprintf($self->__("\\ in address@hidden expansion 
followed `%s' instead of parameter name or \\"), 
+          $self->line_error(sprintf($self->__(
+         "\\ in address@hidden expansion followed `%s' instead of parameter 
name or \\"), 
                              $macro->{'args'}->[0]->{'text'}, $arg), $line_nr);
           $result .= '\\' . $arg;
         }
@@ -2502,7 +2504,7 @@
   } elsif ($self->{'current_node'}) {
     $index_entry->{'node'} = $self->{'current_node'};
   } elsif (!$self->{'current_section'}) {
-    $self->line_warn (sprintf($self->__("Entry for index `%s' outside of any 
node"), 
+    $self->line_warn(sprintf($self->__("Entry for index `%s' outside of any 
node"), 
                                $index_name), $line_nr);
   }
   #print STDERR "INDEX ENTRY address@hidden>{'cmdname'} 
$index_name($number)\n";