summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm95
1 files changed, 95 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm b/Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm
new file mode 100644
index 00000000000..66eed230cf6
--- /dev/null
+++ b/Master/tlpkg/tlperl/lib/Locale/Codes/LangFam.pm
@@ -0,0 +1,95 @@
+package Locale::Codes::LangFam;
+# Copyright (c) 2011-2012 Sullivan Beck
+# This program is free software; you can redistribute it and/or modify it
+# under the same terms as Perl itself.
+
+use strict;
+use warnings;
+require 5.002;
+
+require Exporter;
+use Carp;
+use Locale::Codes;
+use Locale::Codes::Constants;
+use Locale::Codes::LangFam_Codes;
+use Locale::Codes::LangFam_Retired;
+
+#=======================================================================
+# Public Global Variables
+#=======================================================================
+
+our($VERSION,@ISA,@EXPORT,@EXPORT_OK);
+
+$VERSION='3.21';
+@ISA = qw(Exporter);
+@EXPORT = qw(code2langfam
+ langfam2code
+ all_langfam_codes
+ all_langfam_names
+ langfam_code2code
+ LOCALE_LANGFAM_ALPHA
+ );
+
+sub code2langfam {
+ return Locale::Codes::_code2name('langfam',@_);
+}
+
+sub langfam2code {
+ return Locale::Codes::_name2code('langfam',@_);
+}
+
+sub langfam_code2code {
+ return Locale::Codes::_code2code('langfam',@_);
+}
+
+sub all_langfam_codes {
+ return Locale::Codes::_all_codes('langfam',@_);
+}
+
+sub all_langfam_names {
+ return Locale::Codes::_all_names('langfam',@_);
+}
+
+sub rename_langfam {
+ return Locale::Codes::_rename('langfam',@_);
+}
+
+sub add_langfam {
+ return Locale::Codes::_add_code('langfam',@_);
+}
+
+sub delete_langfam {
+ return Locale::Codes::_delete_code('langfam',@_);
+}
+
+sub add_langfam_alias {
+ return Locale::Codes::_add_alias('langfam',@_);
+}
+
+sub delete_langfam_alias {
+ return Locale::Codes::_delete_alias('langfam',@_);
+}
+
+sub rename_langfam_code {
+ return Locale::Codes::_rename_code('langfam',@_);
+}
+
+sub add_langfam_code_alias {
+ return Locale::Codes::_add_code_alias('langfam',@_);
+}
+
+sub delete_langfam_code_alias {
+ return Locale::Codes::_delete_code_alias('langfam',@_);
+}
+
+1;
+# Local Variables:
+# mode: cperl
+# indent-tabs-mode: nil
+# cperl-indent-level: 3
+# cperl-continued-statement-offset: 2
+# cperl-continued-brace-offset: 0
+# cperl-brace-offset: 0
+# cperl-brace-imaginary-offset: 0
+# cperl-label-offset: -2
+# End: