[buildd-tools-devel] Bug#521486: Patch

[Florian Weimer]

tag 521486 patch
thanks

Here's a patch which makes things work to some degree.  The second
hunk corrects what seems to be a search-and-replace-glitch.  Without
it, the -i option is broken.

Index: lib/WannaBuild/Database.pm
===================================================================
--- lib/WannaBuild/Database.pm	(revision 3288)
+++ lib/WannaBuild/Database.pm	(revision 3289)
@@ -24,7 +24,7 @@
 use warnings;
 
 use POSIX;
-use Sbuild qw(isin usage_error);
+use Sbuild qw(isin usage_error version_less version_lesseq version_compare);
 use WannaBuild::Conf;
 use Sbuild::Sysconfig;
 use Sbuild::DB::Info;
@@ -1733,7 +1733,7 @@
     foreach $name (@_) {
 	$name =~ s/_.*$//; # strip version
 	foreach $dist (@dists) {
-	    my $self->get('Current Database') = $self->get('Databases')->{$dist};
+	    $self->set('Current Database', $self->get('Databases')->{$dist});
 	    my $pname = "$name" . ($self->get_conf('DB_INFO_ALL_DISTS') ? "($dist)" : "");
 
 	    $pkg = $self->get('Current Database')->get_package($name);


-- 
Florian Weimer                <fweimer at bfk.de>
BFK edv-consulting GmbH       http://www.bfk.de/
Kriegsstraße 100              tel: +49-721-96201-1
D-76133 Karlsruhe             fax: +49-721-96201-99