From 74308aa622218358ed12a496f52e97bb53ba9eda Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Tue, 22 Sep 2009 13:07:21 +1200 Subject: [PATCH] Updating update.pl to work locally --- misc/translator/update.pl | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) diff --git a/misc/translator/update.pl b/misc/translator/update.pl index 52111c30ed..ad9b9ccd09 100755 --- a/misc/translator/update.pl +++ b/misc/translator/update.pl @@ -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 -- 2.20.1