r11100 - /scripts/qa/qareport-chlog.cgi

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Mon Dec 10 16:58:30 UTC 2007


Author: tincho-guest
Date: Mon Dec 10 16:58:30 2007
New Revision: 11100

URL: http://svn.debian.org/wsvn/?sc=1&rev=11100
Log:
Make RT#nnnnn bugs clickable too.

Modified:
    scripts/qa/qareport-chlog.cgi

Modified: scripts/qa/qareport-chlog.cgi
URL: http://svn.debian.org/wsvn/scripts/qa/qareport-chlog.cgi?rev=11100&op=diff
==============================================================================
--- scripts/qa/qareport-chlog.cgi (original)
+++ scripts/qa/qareport-chlog.cgi Mon Dec 10 16:58:30 2007
@@ -56,9 +56,11 @@
     \#(\d+)         # followed by a bug ID
     \b              # word boundary
 }
-{$1<a href="http://bugs.debian.org/$2">#$2</a>$3}xgm;
+{$1<a href="http://bugs.debian.org/$2">#$2</a>}xgm;
 # treat text as multi-line
-
+# Same for CPAN's RT
+$text =~ s{\bRT#(\d+)\b}
+{<a href="http://rt.cpan.org/Ticket/Display.html?id=$1">RT#$1</a>}xgm;
 
 print qq(<a style="float: right; margin: 0 0 1pt 1pt; clear: none;" href="javascript:more_chlog('$pkg', '$rel')">reload</a>\n);
 print qq(<code style="white-space: pre">$text</code>);




More information about the Pkg-perl-cvs-commits mailing list