correctly generate the author key in META.yml
authorTony Cook <tony@develop=help.com>
Sun, 4 Nov 2007 00:17:45 +0000 (00:17 +0000)
committerTony Cook <tony@develop=help.com>
Sun, 4 Nov 2007 00:17:45 +0000 (00:17 +0000)
Changes
META.yml
Makefile.PL
t/x10meta.t [new file with mode: 0644]

diff --git a/Changes b/Changes
index 85f390485ba0200ec64189ca00f948b0f3987d25..803fd98a98601f513737f2a6fa4be4e8714ddfd1 100644 (file)
--- a/Changes
+++ b/Changes
@@ -55,6 +55,9 @@ Bug fixes:
  - improve the transform2() documentation
    http://rt.cpan.org/Ticket/Display.html?id=29267
 
+ - correctly generate the author key in META.yml
+   http://rt.cpan.org/Ticket/Display.html?id=30377
+
 Imager 0.60 - 30 August 2007
 ===========
 
index f5df1e98703edc296a748b2146c4781a6e5cf1d8..d9fcb74d8b37a66f4e11e1df32756b181557d42b 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -2,7 +2,9 @@
 name: Imager
 version: 0.60
 version_from: Imager.pm
-author: Tony Cook <tony@imager.perl.org>, Arnar M. Hrafnkelsson
+author:
+ - Tony Cook <tony@imager.perl.org>
+ - Arnar M. Hrafnkelsson
 abstract: Perl extension for Generating 24 bit Images
 installdirs: site
 recommends:
index a47d8e9f98520ff5c2bdba21f74a1c36f117dafc..460feedc0d4ff71687f96dd3913b73c9282bae97 100644 (file)
@@ -947,7 +947,12 @@ sub make_metafile {
 name: $opts->{NAME}
 version: $version
 version_from: $opts->{VERSION_FROM}
-author: $opts->{AUTHOR}
+author:
+YAML
+  for my $author (split /,\s*/, $opts->{AUTHOR}) {
+    $meta .= " - $author\n";
+  }
+  $meta .= <<YAML;
 abstract: $opts->{ABSTRACT}
 installdirs: site
 YAML
diff --git a/t/x10meta.t b/t/x10meta.t
new file mode 100644 (file)
index 0000000..8d3e842
--- /dev/null
@@ -0,0 +1,9 @@
+#!perl -w
+# this is not intended for distribution with Imager
+# it is intended for testing from SVN only
+use strict;
+use Test::More;
+eval "use Test::YAML::Meta";
+plan skip_all => "Test::YAML::Meta required for testing META.yml" if $@;
+meta_yaml_ok();
+