Index: bugzilla.dtd =================================================================== RCS file: /cvsroot/mozilla/webtools/bugzilla/bugzilla.dtd,v retrieving revision 1.15 diff -u -r1.15 bugzilla.dtd --- bugzilla.dtd +++ bugzilla.dtd @@ -5,7 +5,7 @@ maintainer CDATA #REQUIRED exporter CDATA #IMPLIED > - + @@ -37,6 +37,7 @@ + Index: Bugzilla/Bug.pm =================================================================== RCS file: /cvsroot/mozilla/webtools/bugzilla/Bugzilla/Bug.pm,v retrieving revision 1.193 diff -u -r1.193 Bugzilla/Bug.pm --- Bugzilla/Bug.pm +++ Bugzilla/Bug.pm @@ -1176,6 +1176,7 @@ bug_status resolution dup_id bug_file_loc status_whiteboard keywords priority bug_severity target_milestone + dupes dependson blocked votes everconfirmed reporter assigned_to cc), @@ -1527,6 +1528,20 @@ return $self->{classification}; } +sub dupes { + my ($self) = @_; + return $self->{'dupes'} if exists $self->{'dupes'}; + return [] if $self->{'error'}; + my $dbh = Bugzilla->dbh; + $self->{'dupes'} = + $dbh->selectcol_arrayref(q{SELECT dupe + FROM duplicates + WHERE dupe_of = ?}, + undef, + $self->{'bug_id'}); + return $self->{'dupes'}; +} + sub dependson { my ($self) = @_; return $self->{'dependson'} if exists $self->{'dependson'}; @@ -2174,7 +2189,7 @@ return sort(@fields); } -# XXX - When Bug::update() will be implemented, we should make this routine +# XXX - Bug::update() was implemented, we should make this routine # a private method. sub EmitDependList { my ($myfield, $targetfield, $bug_id) = (@_); Index: template/en/default/bug/edit.html.tmpl =================================================================== RCS file: /cvsroot/mozilla/webtools/bugzilla/template/en/default/bug/edit.html.tmpl,v retrieving revision 1.103 diff -u -r1.103 template/en/default/bug/edit.html.tmpl --- template/en/default/bug/edit.html.tmpl +++ template/en/default/bug/edit.html.tmpl @@ -223,6 +223,14 @@ [% END %] [% END %] + [%# *** Duplicates *** %] +