r27863 - /trunk/dh-make-perl/dh-make-perl
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sun Dec 7 17:16:00 UTC 2008
Author: dmn
Date: Sun Dec 7 17:15:57 2008
New Revision: 27863
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27863
Log:
Dep::new(): pass to parse() if called with single non-ref argument
Modified:
trunk/dh-make-perl/dh-make-perl
Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=27863&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Sun Dec 7 17:15:57 2008
@@ -374,6 +374,7 @@
# SYNOPSIS
#
# my $d = Dep->new( 'perl' ); # simple dependency
+# my $d = Dep->new('perl (>= 5.10)'); # also parses a single argument
# my $d = Dep->new( 'perl', '5.10' ); # dependency with a version
# my $d = Dep->new( 'perl', '>=', '5.10' );
# # dependency with version and relation
@@ -406,7 +407,7 @@
return $class->SUPER::new(@_) if ref( $_[0] );
- return $class->SUPER::new( { pkg => $_[0] } )
+ return $class->parse( $_[0] )
if @_ == 1;
return $class->SUPER::new( { pkg => $_[0], rel => '>=', ver => $_[1] } )
More information about the Pkg-perl-cvs-commits
mailing list