From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sun, 31 May 2009 09:24:15 +0000 (+0000)
Subject: There is a saner way to write out resources
X-Git-Tag: v0.08106~46
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=commitdiff_plain;h=20ff58f2b13893da8b3b2e49e0fd80b5106015ca

There is a saner way to write out resources
---

diff --git a/Makefile.PL b/Makefile.PL
index 10fe1db..f861df2 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -49,6 +49,12 @@ tests_recursive (qw|
     t
 |);
 
+resources 'IRC'         => 'irc://irc.perl.org/#dbix-class';
+resources 'license'     => 'http://dev.perl.org/licenses/';
+resources 'repository'  => 'http://dev.catalyst.perl.org/svnweb/bast/browse/DBIx-Class/';
+resources 'MailingList' => 'http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class';
+
+
 # re-build README and require extra modules for testing if we're in a checkout
 
 my %force_requires_if_author = (
@@ -129,12 +135,5 @@ if ($Module::Install::AUTHOR) {
     }
     $ok;
   } @{Meta->{values}{build_requires}} ];
-
-  Meta->{values}{resources} = [ 
-    [ 'MailingList', 'http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class' ],
-    [ 'IRC', 'irc://irc.perl.org/#dbix-class' ],
-    [ 'license', 'http://dev.perl.org/licenses/' ],
-    [ 'repository', 'http://dev.catalyst.perl.org/svnweb/bast/browse/DBIx-Class/' ],
-  ];
   Meta->write;
 }