Browse Source

Update metadata and documentation

pull/1/head
David D Lowe 6 years ago
parent
commit
98baa3555c
  1. 14
      Makefile.PL
  2. 14
      README
  3. 30
      lib/Data/MoneyCurrency.pm

14
Makefile.PL

@ -31,6 +31,20 @@ WriteMakefile(
LICENSE => 'mit',
PL_FILES => {},
MIN_PERL_VERSION => 5.006,
META_MERGE => {
'meta-spec' => { version => 2 },
homepage => 'https://github.com/Flimm/perl5-Data-MoneyCurrency',
bugtracker => {
web => 'https://github.com/Flimm/perl5-Data-MoneyCurrency/issues',
},
resources => {
repository => {
type => 'git',
url => 'https://github.com/Flimm/perl5-Data-MoneyCurrency.git',
web => 'https://github.com/Flimm/perl5-Data-MoneyCurrency',
},
},
},
CONFIGURE_REQUIRES => {
'ExtUtils::MakeMaker' => 0,
'File::ShareDir::Install' => 0,

14
README

@ -20,17 +20,11 @@ perldoc command.
You can also look for information at:
RT, CPAN's request tracker (report bugs here)
http://rt.cpan.org/NoAuth/Bugs.html?Dist=Data-MoneyCurrency
GitHub issues (report bugs here)
https://github.com/Flimm/perl5-Data-MoneyCurrency/issues
AnnoCPAN, Annotated CPAN documentation
http://annocpan.org/dist/Data-MoneyCurrency
CPAN Ratings
http://cpanratings.perl.org/d/Data-MoneyCurrency
Search CPAN
http://search.cpan.org/dist/Data-MoneyCurrency/
Meta CPAN
https://metacpan.org/pod/Data::MoneyCurrency
LICENSE AND COPYRIGHT

30
lib/Data/MoneyCurrency.pm

@ -336,7 +336,13 @@ sub get_currencies_for_country {
croak "get_currency received no arguments" if @_ == 0;
croak "get_currency received more than one argument" if @_ > 1;
my $country = lc($_[0]);
return $rh_currencies_for_country->{$country};
# Return shallow copy to avoid mutating $rh_currencies_for_country
my $rv = $rh_currencies_for_country->{$country};
if ($rv) {
return [@$rv];
}
return;
}
=head1 AUTHOR
@ -345,9 +351,9 @@ David D Lowe, C<< <daviddlowe.flimm at gmail.com> >>
=head1 BUGS
Please report any bugs or feature requests to C<bug-data-moneycurrency at rt.cpan.org>, or through
the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Data-MoneyCurrency>. I will be notified, and then you'll
automatically be notified of progress on your bug as I make changes.
Please report any bugs or feature requests through the web interface at
L<https://github.com/Flimm/perl5-Data-MoneyCurrency/issues>.
=head1 SUPPORT
@ -359,21 +365,9 @@ You can also look for information at:
=over 4
=item * RT: CPAN's request tracker (report bugs here)
L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Data-MoneyCurrency>
=item * AnnoCPAN: Annotated CPAN documentation
L<http://annocpan.org/dist/Data-MoneyCurrency>
=item * CPAN Ratings
L<http://cpanratings.perl.org/d/Data-MoneyCurrency>
=item * Search CPAN
=item * Meta CPAN
L<http://search.cpan.org/dist/Data-MoneyCurrency/>
L<https://metacpan.org/pod/Data::MoneyCurrency>
=back

Loading…
Cancel
Save