fix syntax error in bug

[debbugs.git] / bin / debbugs-updatesqlcache

diff --git a/bin/debbugs-updatesqlcache b/bin/debbugs-updatesqlcache
index 8e57d4a0032a6c994d3a10e9cd8849d9118d5fc0..8f6178776a179740991cb4421967c3fc20ed0441 100755 (executable)
--- a/bin/debbugs-updatesqlcache
+++ b/bin/debbugs-updatesqlcache
@@ -96,7 +96,7 @@ use Debbugs::Status qw(bug_presence read_bug);
 use Debbugs::DB;
 use DateTime;
 use File::stat;
-use List::MoreUtils qw(natatime);
+use List::MoreUtils qw(natatime uniq);
 use POSIX qw(ceil);
 
 my %options =
@@ -222,12 +222,12 @@ sub update_cache {
        # select all bugs which are in packages which have had a binary
        # association modified
        push @bugs,
-           map {$_->{'bug_binpackages.id'}}
+           map {$_->{bug_binpackages}{bug}}
            $s->resultset('BinAssociation')->
            search_rs({'me.modified' => {'>=',$last_query_time},
                      },
-                    {columns => [qw(bug_binpackages.id)],
-                     join => {bin_vers =>
+                    {columns => [qw(bug_binpackages.bug)],
+                     join => {bin =>
                              {bin_pkg =>
                               'bug_binpackages'
                              }},
@@ -236,12 +236,12 @@ sub update_cache {
                     )->all();
        # or a source association modified
        push @bugs,
-           map {$_->{'bug_srcpackages.id'}}
+           map {$_->{bug_srcpackages}{bug}}
            $s->resultset('SrcAssociation')->
            search_rs({'me.modified' => {'>=',$last_query_time},
                      },
-                    {columns => [qw(bug_srcpackages.id)],
-                     join => {src_vers =>
+                    {columns => [qw(bug_srcpackages.bug)],
+                     join => {source =>
                              {src_pkg =>
                               'bug_srcpackages'
                              }},