diff options
Diffstat (limited to 'macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl')
-rw-r--r-- | macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl index 23f7606d28..4b70e025fe 100644 --- a/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl +++ b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/sample/simplecal/bin/simplecal.pl @@ -13,14 +13,14 @@ use Locale::Messages qw (LC_MESSAGES); # Our script contains translatable messages. We have to assign # it a text domain. Note that this is only needed here because the # script *itself* contains translatable messages from the text domain -# "org.imperia.simplecal". -use Locale::TextDomain ('org.imperia.simplecal'); +# "com.cantanea.simplecal". +use Locale::TextDomain ('com.cantanea.simplecal'); use vars qw ($VERSION); $VERSION = '1.0'; # Set the locale according to the environment. -setlocale (LC_MESSAGES, ""); +setlocale LC_MESSAGES, ""; # Print a greeting message. We want to be flexible with the package # name, and so we will make this a placeholder. |