Drop srcversion logic that was unused
authorJeroen van Wolffelaar <jeroen@wolffelaar.nl>
Wed, 1 Feb 2006 21:46:00 +0000 (21:46 +0000)
committerJeroen van Wolffelaar <jeroen@wolffelaar.nl>
Wed, 1 Feb 2006 21:46:00 +0000 (21:46 +0000)
bin/parse-packages

index 1c671e5076754c1019943248a0f23e9bb69a3bfe..aad66889f510bb97bb5825ad80b9a5bd697969a5 100755 (executable)
@@ -68,13 +68,9 @@ for my $suite (@suites) {
 
                $package_names{$data{'package'}} = 1;
                my $src = $data{'package'};
-               my $srcversion = $data{'version'};
                if ($data{'source'}) {
                        $src = $data{'source'};
-                       if ($src =~ /(\S+) \((\S+)\)/) {
-                               $src = $1;
-                               $srcversion = $2;
-                       }
+                       $src =~ s/ .*//; # strip version info
                }
                my $descr = $data{'description'};
                my $did = undef;