From 144c47058535c630991b466ac80346a30852cb13 Mon Sep 17 00:00:00 2001 From: "dave%intrec.com" <> Date: Thu, 25 Jan 2001 06:24:06 +0000 Subject: Fix for bug 30694: adds title attributes to bug links with bug status and description. Patch by jake@acutex.net --- bug_form.pl | 15 +++------------ 1 file changed, 3 insertions(+), 12 deletions(-) (limited to 'bug_form.pl') diff --git a/bug_form.pl b/bug_form.pl index 58f1b6cb2..fcd33a7a1 100644 --- a/bug_form.pl +++ b/bug_form.pl @@ -321,24 +321,15 @@ sub EmitDependList { my ($desc, $myfield, $targetfield) = (@_); print "$desc:"; my @list; - SendSQL("select dependencies.$targetfield, bugs.bug_status, short_desc + SendSQL("select dependencies.$targetfield from dependencies, bugs where dependencies.$myfield = $id and bugs.bug_id = dependencies.$targetfield order by dependencies.$targetfield"); while (MoreSQLData()) { - my ($i, $stat, $dep_desc) = (FetchSQLData()); + my ($i) = (FetchSQLData()); push(@list, $i); - my $opened = ($stat eq "NEW" || $stat eq "ASSIGNED" || - $stat eq "REOPENED"); - if (!$opened) { - print ""; - } - $dep_desc = value_quote($dep_desc); - print qq{$i}; - if (!$opened) { - print ""; - } + print GetBugLink($i, $i); print " "; } print "