r56175 - /trunk/dh-make-perl/lib/Debian/AptContents.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Fri Apr 16 14:47:30 2010
New Revision: 56175

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=56175
Log:
construct alternative dependency only when needed

no point when a single package matches the requirements

Modified:
    trunk/dh-make-perl/lib/Debian/AptContents.pm

Modified: trunk/dh-make-perl/lib/Debian/AptContents.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/Debian/AptContents.pm?rev=56175&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/Debian/AptContents.pm (original)
+++ trunk/dh-make-perl/lib/Debian/AptContents.pm Fri Apr 16 14:47:30 2010
@@ -429,10 +429,11 @@
     } @matches;
 
     my $direct_dep;
-    $direct_dep
-        = Debian::Dependency->new(
-        [ map ( { pkg => $_, rel => '>=', ver => $version }, @matches ) ] )
-        if @matches;
+    $direct_dep = Debian::Dependency->new(
+          ( @matches > 1 )
+        ? [ map ( { pkg => $_, rel => '>=', ver => $version }, @matches ) ]
+        : ( $matches[0], $version )
+    ) if @matches;
 
     my $running_perl = $Config::Config{version};