[Bps-public-commit] RT-Extension-rt_cpan_org branch, master, updated. dc519ff4d876413f062433163354336397fd5a89

[Thomas Sibley]

The branch, master has been updated
       via  dc519ff4d876413f062433163354336397fd5a89 (commit)
      from  db31d3b2e1c63233c11531ef193c05780ab58d1b (commit)

Summary of changes:
 html/Callbacks/rt_cpan_org/Dist/Elements/ShowNotes/Top | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 html/Callbacks/rt_cpan_org/Dist/Elements/ShowNotes/Top

- Log -----------------------------------------------------------------
commit dc519ff4d876413f062433163354336397fd5a89
Author: Thomas Sibley <trs at bestpractical.com>
Date:   Mon Jul 22 22:59:25 2013 -0700

    Link to metacpan for each queue

diff --git a/html/Callbacks/rt_cpan_org/Dist/Elements/ShowNotes/Top b/html/Callbacks/rt_cpan_org/Dist/Elements/ShowNotes/Top
new file mode 100644
index 0000000..bf09341
--- /dev/null
+++ b/html/Callbacks/rt_cpan_org/Dist/Elements/ShowNotes/Top
@@ -0,0 +1,10 @@
+<%args>
+$Queue
+</%args>
+<%init>
+return if $Queue->Disabled;
+
+my $dist = $m->interp->apply_escapes($Queue->Name, 'h');
+my $dist_u = $m->interp->apply_escapes($Queue->Name, 'u', 'h');
+</%init>
+<p><&|/l_unsafe, $dist, qq[<a href="https://metacpan.org/release/$dist_u">], "</a>" &>This queue is for tickets about the [_2][_1] CPAN distribution[_3].</&></p>

-----------------------------------------------------------------------