Commit | Line | Data |
---|---|---|
c69a30ec CBW |
1 | package Locale::Codes::LangExt; |
2 | # Copyright (c) 2011-2011 Sullivan Beck | |
3 | # This program is free software; you can redistribute it and/or modify it | |
4 | # under the same terms as Perl itself. | |
5 | ||
6 | use strict; | |
7 | use warnings; | |
8 | require 5.002; | |
9 | ||
10 | require Exporter; | |
11 | use Carp; | |
12 | use Locale::Codes; | |
13 | use Locale::Codes::Constants; | |
14 | use Locale::Codes::LangExt_Codes; | |
4345d05b | 15 | use Locale::Codes::LangExt_Retired; |
c69a30ec CBW |
16 | |
17 | #======================================================================= | |
18 | # Public Global Variables | |
19 | #======================================================================= | |
20 | ||
21 | our($VERSION,@ISA,@EXPORT,@EXPORT_OK); | |
22 | ||
4345d05b | 23 | $VERSION='3.20'; |
c69a30ec CBW |
24 | @ISA = qw(Exporter); |
25 | @EXPORT = qw(code2langext | |
26 | langext2code | |
27 | all_langext_codes | |
28 | all_langext_names | |
29 | langext_code2code | |
30 | LOCALE_LANGEXT_ALPHA | |
31 | ); | |
32 | ||
c69a30ec | 33 | sub code2langext { |
4345d05b | 34 | return Locale::Codes::_code2name('langext',@_); |
c69a30ec CBW |
35 | } |
36 | ||
c69a30ec | 37 | sub langext2code { |
4345d05b | 38 | return Locale::Codes::_name2code('langext',@_); |
c69a30ec CBW |
39 | } |
40 | ||
c69a30ec | 41 | sub langext_code2code { |
4345d05b | 42 | return Locale::Codes::_code2code('langext',@_); |
c69a30ec CBW |
43 | } |
44 | ||
c69a30ec | 45 | sub all_langext_codes { |
4345d05b | 46 | return Locale::Codes::_all_codes('langext',@_); |
c69a30ec CBW |
47 | } |
48 | ||
c69a30ec | 49 | sub all_langext_names { |
4345d05b | 50 | return Locale::Codes::_all_names('langext',@_); |
c69a30ec CBW |
51 | } |
52 | ||
c69a30ec | 53 | sub rename_langext { |
4345d05b | 54 | return Locale::Codes::_rename('langext',@_); |
c69a30ec CBW |
55 | } |
56 | ||
c69a30ec | 57 | sub add_langext { |
4345d05b | 58 | return Locale::Codes::_add_code('langext',@_); |
c69a30ec CBW |
59 | } |
60 | ||
c69a30ec | 61 | sub delete_langext { |
4345d05b | 62 | return Locale::Codes::_delete_code('langext',@_); |
c69a30ec CBW |
63 | } |
64 | ||
c69a30ec | 65 | sub add_langext_alias { |
4345d05b | 66 | return Locale::Codes::_add_alias('langext',@_); |
c69a30ec CBW |
67 | } |
68 | ||
c69a30ec | 69 | sub delete_langext_alias { |
4345d05b | 70 | return Locale::Codes::_delete_alias('langext',@_); |
c69a30ec CBW |
71 | } |
72 | ||
c69a30ec | 73 | sub rename_langext_code { |
4345d05b | 74 | return Locale::Codes::_rename_code('langext',@_); |
c69a30ec CBW |
75 | } |
76 | ||
c69a30ec | 77 | sub add_langext_code_alias { |
4345d05b | 78 | return Locale::Codes::_add_code_alias('langext',@_); |
c69a30ec CBW |
79 | } |
80 | ||
c69a30ec | 81 | sub delete_langext_code_alias { |
4345d05b | 82 | return Locale::Codes::_delete_code_alias('langext',@_); |
c69a30ec CBW |
83 | } |
84 | ||
85 | 1; | |
86 | # Local Variables: | |
87 | # mode: cperl | |
88 | # indent-tabs-mode: nil | |
89 | # cperl-indent-level: 3 | |
90 | # cperl-continued-statement-offset: 2 | |
91 | # cperl-continued-brace-offset: 0 | |
92 | # cperl-brace-offset: 0 | |
93 | # cperl-brace-imaginary-offset: 0 | |
94 | # cperl-label-offset: -2 | |
95 | # End: |