From 7770611e745f20814ff34569608edd630b8ab079 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@mandriva.org>
Date: Wed, 10 Feb 2010 16:34:36 +0000
Subject: using generated MYMETA.yml would be better. indeed, this creates
 what's been detected.

---
 perl.req-from-meta | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'perl.req-from-meta')

diff --git a/perl.req-from-meta b/perl.req-from-meta
index 5b612dd..243f54f 100755
--- a/perl.req-from-meta
+++ b/perl.req-from-meta
@@ -3,8 +3,7 @@
 use strict;
 use warnings;
 
-use JSON qw{ from_json };
-use YAML qw{ Load      };
+use YAML qw{ Load };
 
 # slurp the file
 my $path = shift;
@@ -13,9 +12,7 @@ my $data = do { local $/; <$fh> };
 close $fh;
 
 # parse meta - either yaml or json
-my $meta = $path =~ /\.yml$/
-    ? Load( $data )
-    : from_json( $data );
+my $meta = Load($data);
 
 # dump the requires with their version
 my $requires = $meta->{requires};
-- 
cgit v1.2.1