This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade Locale-Codes to 3.21
[perl5.git] / cpan / Locale-Codes / lib / Locale / Codes / LangExt.pm
CommitLineData
c69a30ec 1package Locale::Codes::LangExt;
4764fecd 2# Copyright (c) 2011-2012 Sullivan Beck
c69a30ec
CBW
3# This program is free software; you can redistribute it and/or modify it
4# under the same terms as Perl itself.
5
6use strict;
7use warnings;
8require 5.002;
9
10require Exporter;
11use Carp;
12use Locale::Codes;
13use Locale::Codes::Constants;
14use Locale::Codes::LangExt_Codes;
4345d05b 15use Locale::Codes::LangExt_Retired;
c69a30ec
CBW
16
17#=======================================================================
18# Public Global Variables
19#=======================================================================
20
21our($VERSION,@ISA,@EXPORT,@EXPORT_OK);
22
4764fecd 23$VERSION='3.21';
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 33sub code2langext {
4345d05b 34 return Locale::Codes::_code2name('langext',@_);
c69a30ec
CBW
35}
36
c69a30ec 37sub langext2code {
4345d05b 38 return Locale::Codes::_name2code('langext',@_);
c69a30ec
CBW
39}
40
c69a30ec 41sub langext_code2code {
4345d05b 42 return Locale::Codes::_code2code('langext',@_);
c69a30ec
CBW
43}
44
c69a30ec 45sub all_langext_codes {
4345d05b 46 return Locale::Codes::_all_codes('langext',@_);
c69a30ec
CBW
47}
48
c69a30ec 49sub all_langext_names {
4345d05b 50 return Locale::Codes::_all_names('langext',@_);
c69a30ec
CBW
51}
52
c69a30ec 53sub rename_langext {
4345d05b 54 return Locale::Codes::_rename('langext',@_);
c69a30ec
CBW
55}
56
c69a30ec 57sub add_langext {
4345d05b 58 return Locale::Codes::_add_code('langext',@_);
c69a30ec
CBW
59}
60
c69a30ec 61sub delete_langext {
4345d05b 62 return Locale::Codes::_delete_code('langext',@_);
c69a30ec
CBW
63}
64
c69a30ec 65sub add_langext_alias {
4345d05b 66 return Locale::Codes::_add_alias('langext',@_);
c69a30ec
CBW
67}
68
c69a30ec 69sub delete_langext_alias {
4345d05b 70 return Locale::Codes::_delete_alias('langext',@_);
c69a30ec
CBW
71}
72
c69a30ec 73sub rename_langext_code {
4345d05b 74 return Locale::Codes::_rename_code('langext',@_);
c69a30ec
CBW
75}
76
c69a30ec 77sub add_langext_code_alias {
4345d05b 78 return Locale::Codes::_add_code_alias('langext',@_);
c69a30ec
CBW
79}
80
c69a30ec 81sub delete_langext_code_alias {
4345d05b 82 return Locale::Codes::_delete_code_alias('langext',@_);
c69a30ec
CBW
83}
84
851;
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: