undef, $timestamp, $bugid);
}
-# This method is private and is not to be used outside of the Bug class.
+# XXX - When Bug::update() will be implemented, we should make this routine
+# a private method.
sub EmitDependList {
my ($myfield, $targetfield, $bug_id) = (@_);
my $dbh = Bugzilla->dbh;
- my $list_ref =
- $dbh->selectcol_arrayref(
- "SELECT dependencies.$targetfield
- FROM dependencies, bugs
- WHERE dependencies.$myfield = ?
- AND bugs.bug_id = dependencies.$targetfield
- ORDER BY dependencies.$targetfield",
- undef, ($bug_id));
+ my $list_ref = $dbh->selectcol_arrayref(
+ "SELECT $targetfield FROM dependencies
+ WHERE $myfield = ? ORDER BY $targetfield",
+ undef, $bug_id);
return $list_ref;
}
sub SnapShotDeps {
- my ($i, $target, $me) = (@_);
- SendSQL("SELECT $target FROM dependencies WHERE $me = $i ORDER BY $target");
- my @list;
- while (MoreSQLData()) {
- push(@list, FetchOneColumn());
- }
- return join(',', @list);
+ my ($bug_id, $target, $me) = (@_);
+ my $list = Bugzilla::Bug::EmitDependList($me, $target, $bug_id);
+ return join(',', @$list);
}