[COMMIT LOGREPORT] service/all/lib/Lire LrCommand.pm,1.6,1.7

[Wolfgang Sourdeau]

Update of /cvsroot/logreport/service/all/lib/Lire
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31090/all/lib/Lire

Modified Files:
	LrCommand.pm 
Log Message:
- make sure all calls to $self->info() are gettextized.


Index: LrCommand.pm
===================================================================
RCS file: /cvsroot/logreport/service/all/lib/Lire/LrCommand.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- LrCommand.pm	29 Dec 2004 10:01:49 -0000	1.6
+++ LrCommand.pm	13 Feb 2005 06:30:16 -0000	1.7
@@ -482,7 +482,7 @@
     my $out_fh;
     if ( $algo ) {
         $self->info( __x( 'Log file was compressed using {algo}.',
-                     'algo' => $algo ) );
+                          'algo' => $algo ) );
         $self->error( __( "gzip(1) isn't available" ) )
           unless Lire::Config->get_var( 'gzip_path' )->is_valid();
         my $gzip = Lire::Config->get( 'gzip_path' );
@@ -611,12 +611,12 @@
     $self->init_report_config( $converter );
     $self->import_log( $converter, $logfile );
 
-    $self->info( 'Running analysers...' );
+    $self->info( __( 'Running analysers...' ) );
     my $cfg = $self->{'_report_cfg'};
     eval { $cfg->create_analyser_streams( $self->{'_store'} ) };
     $self->error( $@ ) if $@;
 
-    $self->info( 'Generating XML report...' );
+    $self->info( __( 'Generating XML report...' ) );
     my $report = eval { $cfg->generate_report( $self->{'_store'} ) };
     $self->error( $@ ) if $@;
 

-- 
To UNSUBSCRIBE, email to commit-request at logreport.org with a subject of 
"unsubscribe". Trouble? Send an email with subject "help" to 
commit-request at logreport.org