Update of /cvsroot/appwrap/AppWrap/Apache/AppWrap
In directory sc8-pr-cvs1:/tmp/cvs-serv31941
Modified Files:
Subs.pm
Log Message:
Many i18n changes
Index: Subs.pm
===================================================================
RCS file: /cvsroot/appwrap/AppWrap/Apache/AppWrap/Subs.pm,v
retrieving revision 1.33
retrieving revision 1.34
diff -C2 -d -r1.33 -r1.34
*** Subs.pm 21 Dec 2002 11:06:51 -0000 1.33
--- Subs.pm 26 Dec 2002 01:34:50 -0000 1.34
***************
*** 20,24 ****
use Date::Parse qw(str2time);
use Date::Calc qw(Add_Delta_YMD);
! use Data::Dumper;
use GD::Graph ();
--- 20,24 ----
use Date::Parse qw(str2time);
use Date::Calc qw(Add_Delta_YMD);
! use Data::Dumper ();
[...1129 lines suppressed...]
+ if ($my_text->{$table}{$phase}{$element}) {
+ return $my_text->{$table}{$phase}{$element};
+ }
+ # value same for all tables
+ elsif ($my_text->{DEFAULT}{$phase}{$element}) {
+ return $my_text->{DEFAULT}{$phase}{$element};
+ }
+ # value same for all phases of this table
+ elsif ($my_text->{$table}{DEFAULT}{$element}) {
+ return $my_text->{$table}{DEFAULT}{$element};
+ }
+ # value same for all phases, all tables
+ elsif ($my_text->{DEFAULT}{DEFAULT}{$element}) {
+ return $my_text->{DEFAULT}{DEFAULT}{$element};
+ }
+ # no match whatsoever
+ return;
+ } # end specific_msg
|
