From 7033a5f254f8545ef65ed77a51080dd62601a5a4 Mon Sep 17 00:00:00 2001
From: "dmose%mozilla.org" <>
Date: Thu, 7 Dec 2000 11:04:31 +0000
Subject: patch from Jake <jsteenhagen@novagate.com> to fix bug 59515; adds a
 title attribute containing status and short description to various bug links.
  In some browsers (most Mozilla builds, at least) this makes the status and
 short description available as a tooltip, so it is no longer necessary to
 click through to see it. r=dmose@mozilla.org

---
 bug_form.pl |  7 ++++---
 globals.pl  | 12 ++++++++++--
 2 files changed, 14 insertions(+), 5 deletions(-)

diff --git a/bug_form.pl b/bug_form.pl
index e4fa39c6e..3fd71c99e 100644
--- a/bug_form.pl
+++ b/bug_form.pl
@@ -321,20 +321,21 @@ sub EmitDependList {
     my ($desc, $myfield, $targetfield) = (@_);
     print "<th align=right>$desc:</th><td>";
     my @list;
-    SendSQL("select dependencies.$targetfield, bugs.bug_status
+    SendSQL("select dependencies.$targetfield, bugs.bug_status, short_desc
  from dependencies, bugs
  where dependencies.$myfield = $id
    and bugs.bug_id = dependencies.$targetfield
  order by dependencies.$targetfield");
     while (MoreSQLData()) {
-        my ($i, $stat) = (FetchSQLData());
+        my ($i, $stat, $dep_desc) = (FetchSQLData());
         push(@list, $i);
         my $opened = ($stat eq "NEW" || $stat eq "ASSIGNED" ||
                       $stat eq "REOPENED");
         if (!$opened) {
             print "<strike>";
         }
-        print qq{<a href="show_bug.cgi?id=$i">$i</a>};
+        $dep_desc = value_quote($dep_desc);
+        print qq{<a href="show_bug.cgi?id=$i" title="$stat - $dep_desc">$i</a>};
         if (!$opened) {
             print "</strike>";
         }
diff --git a/globals.pl b/globals.pl
index f8bb4e217..bd1cf3ede 100644
--- a/globals.pl
+++ b/globals.pl
@@ -676,15 +676,23 @@ sub quoteUrls {
     while ($text =~ s/\bbug(\s|%\#)*(\d+)/"##$count##"/ei) {
         my $item = $&;
         my $num = $2;
+        SendSQL("select bugs.bug_status, short_desc
+        from bugs where bugs.bug_id = $num");
+        my ($stat, $dep_desc) = (FetchSQLData());
         $item = value_quote($item); # Not really necessary, since we know
                                     # there's no special chars in it.
-        $item = qq{<A HREF="show_bug.cgi?id=$num">$item</A>};
+        $dep_desc = value_quote($dep_desc);
+        $item = qq{<A HREF="show_bug.cgi?id=$num" title="$stat - $dep_desc">$item</A>};
         $things[$count++] = $item;
     }
     while ($text =~ s/\*\*\* This bug has been marked as a duplicate of (\d+) \*\*\*/"##$count##"/ei) {
         my $item = $&;
         my $num = $1;
-        $item =~ s@\d+@<A HREF="show_bug.cgi?id=$num">$num</A>@;
+        SendSQL("select bugs.bug_status, short_desc
+        from bugs where bugs.bug_id = $num");
+        my ($stat, $dep_desc) = (FetchSQLData());
+        $dep_desc = value_quote($dep_desc);
+        $item =~ s@\d+@<A HREF="show_bug.cgi?id=$num" title="$stat - $dep_desc">$num</A>@;
         $things[$count++] = $item;
     }
     while ($text =~ s/Created an attachment \(id=(\d+)\)/"##$count##"/e) {
-- 
cgit v1.2.3-24-g4f1b