- strip version from source tag
authorMichael Schröder <mls@suse.de>
Wed, 21 Oct 2009 12:51:30 +0000 (12:51 +0000)
committerMichael Schröder <mls@suse.de>
Wed, 21 Oct 2009 12:51:30 +0000 (12:51 +0000)
Build/Deb.pm

index 349b7d2..afc3c10 100644 (file)
@@ -219,7 +219,10 @@ sub query {
   return undef unless %res;
   my $name = $res{'PACKAGE'};
   my $src = $name;
-  $src = $res{'SOURCE'} if $res{'SOURCE'};
+  if ($res{'SOURCE'}) {
+    $src = $res{'SOURCE'};
+    $src =~ s/\s.*$//;
+  }
   my @provides = split(',\s*', $res{'PROVIDES'} || '');
   push @provides, "$name = $res{'VERSION'}";
   my @depends = split(',\s*', $res{'DEPENDS'} || '');