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 " | |