Bug 182946 - fix regressions from bug 171493

(Bug.pm/show_bug.cgi/bug_form.pl reorg)
r,a=justdave


git-svn-id: svn://10.0.0.236/trunk@134677 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
bbaetz%student.usyd.edu.au
2002-12-03 09:44:42 +00:00
parent 496da7acfd
commit 1ee4c74dd0
4 changed files with 14 additions and 14 deletions

View File

@@ -143,7 +143,7 @@ sub initBug {
"assigned_to", "reporter", "bug_file_loc", "short_desc",
"target_milestone", "qa_contact", "status_whiteboard",
"creation_ts", "delta_ts", "votes",
"reporter_accessible", "cclist_accessible".
"reporter_accessible", "cclist_accessible",
"estimated_time", "remaining_time")
{
$fields{$field} = shift @row;
@@ -233,9 +233,9 @@ sub initBug {
if (@depends) {
$self->{'dependson'} = \@depends;
}
my @blocks = EmitDependList("dependson", "blocked", $bug_id);
if (@blocks) {
$self->{'blocks'} = \@blocks;
my @blocked = EmitDependList("dependson", "blocked", $bug_id);
if (@blocked) {
$self->{'blocked'} = \@blocked;
}
return $self;
@@ -454,7 +454,7 @@ sub emitXML {
}
}
foreach my $field ("dependson", "blocks", "cc") {
foreach my $field ("dependson", "blocked", "cc") {
if (defined $self->{$field}) {
for (my $i=0 ; $i < @{$self->{$field}} ; $i++) {
$xml .= " <$field>" . $self->{$field}[$i] . "</$field>\n";