Updating update.pl to work locally
authorChris Cormack <chris@bigballofwax.co.nz>
Tue, 22 Sep 2009 01:07:21 +0000 (13:07 +1200)
committerChris Cormack <chris@bigballofwax.co.nz>
Tue, 22 Sep 2009 01:07:21 +0000 (13:07 +1200)
misc/translator/update.pl

index 52111c3..ad9b9cc 100755 (executable)
@@ -8,17 +8,18 @@ use C4::Languages;
 my $dir = "po";
 my $po;
 opendir (DIR,$dir);
-while (defined($po = readdir(DIR))) {
-    next if $po =~ /^\.\.?$/;
-    print "processing $po...\n";
-    
-#    my $interface = 'intranet';
-#    if ($po =~ /opac/) {
-my        $interface = 'opac';
-#    }
-    system("./tmpl_process3.pl update -i ../../koha-tmpl/$interface-tmpl/prog/en/ -s po/$po -r");
-    print "Finished\n";
-}
+
+while (defined($po = readdir(DIR))) {                                                                                                                                                                               
+        next if $po =~ /^\.\.?$/;                                                                                                                                                                                       
+        print "processing $po...\n";                                                                                                                                                                                    
+        my $interface = 'intranet';                                                                                                                                                                                     
+        if ($po =~ /opac/) {                                                                                                                                                                                            
+                   $interface = 'opac';                                                                                                                                                                                        
+               }                                                                                                                                                                                                               
+        system("./tmpl_process3.pl update -i ../../koha-tmpl/$interface-tmpl/prog/en/ -s po/$po -r");                                                                                                                   
+        print "Finished\n";                                                                                                                                                                                             
+    }              
+
 closedir DIR;
 
 =head