diff options
Diffstat (limited to 'lib/OpenSLX/Translations')
-rw-r--r-- | lib/OpenSLX/Translations/de.pm | 26 | ||||
-rw-r--r-- | lib/OpenSLX/Translations/posix.pm | 31 |
2 files changed, 22 insertions, 35 deletions
diff --git a/lib/OpenSLX/Translations/de.pm b/lib/OpenSLX/Translations/de.pm index 081e44e4..e98edd03 100644 --- a/lib/OpenSLX/Translations/de.pm +++ b/lib/OpenSLX/Translations/de.pm @@ -14,15 +14,20 @@ package OpenSLX::Translations::de; use strict; -use vars qw(@ISA @EXPORT $VERSION); +use warnings; -use Exporter; -$VERSION = 0.02; -@ISA = qw(Exporter); +our $VERSION = 0.02; -@EXPORT = qw(%translations); +my %translations; -use vars qw(%translations); +################################################################################ +### Implementation +################################################################################ +sub getAllTranslations +{ + my $class = shift; + return \%translations; +} ################################################################################ ### Translations @@ -352,12 +357,3 @@ use vars qw(%translations); ); 1; - - - - - - - - - diff --git a/lib/OpenSLX/Translations/posix.pm b/lib/OpenSLX/Translations/posix.pm index e1199f47..05e16ed5 100644 --- a/lib/OpenSLX/Translations/posix.pm +++ b/lib/OpenSLX/Translations/posix.pm @@ -14,15 +14,20 @@ package OpenSLX::Translations::posix; use strict; -use vars qw(@ISA @EXPORT $VERSION); +use warnings; -use Exporter; -$VERSION = 0.02; -@ISA = qw(Exporter); +our $VERSION = 0.02; -@EXPORT = qw(%translations); +my %translations; -use vars qw(%translations); +################################################################################ +### Implementation +################################################################################ +sub getAllTranslations +{ + my $class = shift; + return \%translations; +} ################################################################################ ### Translations @@ -351,18 +356,4 @@ use vars qw(%translations); ); - - - - 1; - - - - - - - - - - |