Translation.pm (gscan2pdf-2.13.1.tar.xz) | : | Translation.pm (gscan2pdf-2.13.2.tar.xz) | ||
---|---|---|---|---|
package Gscan2pdf::Translation; | package Gscan2pdf::Translation; | |||
use strict; | use strict; | |||
use warnings; | use warnings; | |||
use Locale::gettext 1.05; # For translations | use Locale::gettext 1.05; # For translations | |||
BEGIN { | BEGIN { | |||
use Exporter (); | use Exporter (); | |||
our ( $VERSION, @EXPORT_OK, %EXPORT_TAGS ); | our ( $VERSION, @EXPORT_OK, %EXPORT_TAGS ); | |||
$VERSION = '2.13.1'; | $VERSION = '2.13.2'; | |||
use base qw(Exporter); | use base qw(Exporter); | |||
%EXPORT_TAGS = (); # eg: TAG => [ qw!name1 name2! ], | %EXPORT_TAGS = (); # eg: TAG => [ qw!name1 name2! ], | |||
# your exported package globals go here, | # your exported package globals go here, | |||
# as well as any optionally exported functions | # as well as any optionally exported functions | |||
@EXPORT_OK = qw( __ ); | @EXPORT_OK = qw( __ ); | |||
} | } | |||
my $d; | my $d; | |||
sub set_domain { | sub set_domain { | |||
my ( $prog_name, $locale ) = @_; | my ( $prog_name, $locale ) = @_; | |||
End of changes. 2 change blocks. | ||||
2 lines changed or deleted | 2 lines changed or added |