[Catalyst-commits] r14111 - in trunk/examples/CatalystAdvent: . lib/CatalystAdvent

[dpetrov at dev.catalyst.perl.org]

Author: dpetrov
Date: 2011-09-27 13:42:30 +0000 (Tue, 27 Sep 2011)
New Revision: 14111

Modified:
   trunk/examples/CatalystAdvent/Changes
   trunk/examples/CatalystAdvent/lib/CatalystAdvent/Pod.pm
Log:
Create links to metacpan instead of search.cpan.org

Modified: trunk/examples/CatalystAdvent/Changes
===================================================================
--- trunk/examples/CatalystAdvent/Changes	2011-09-27 12:40:35 UTC (rev 14110)
+++ trunk/examples/CatalystAdvent/Changes	2011-09-27 13:42:30 UTC (rev 14111)
@@ -3,6 +3,7 @@
 0.04
         - Display article list with names underneath the calendar on the
           per-year page 
+        - Create links to metacpan instead of search.cpan.org
 
 0.03
         - By default, display the most recent year for which we have

Modified: trunk/examples/CatalystAdvent/lib/CatalystAdvent/Pod.pm
===================================================================
--- trunk/examples/CatalystAdvent/lib/CatalystAdvent/Pod.pm	2011-09-27 12:40:35 UTC (rev 14110)
+++ trunk/examples/CatalystAdvent/lib/CatalystAdvent/Pod.pm	2011-09-27 13:42:30 UTC (rev 14111)
@@ -58,7 +58,7 @@
     $text = Pod::Xhtml::_htmlEscape($text);
     $targ = Pod::Xhtml::_htmlEscape($targ);
 
-    return qq{<a href="http://search.cpan.org/perldoc?$targ">$text</a>};
+    return qq{<a href="http://metacpan.org/module/$targ">$text</a>};
 }
 
 sub title   { $_[0]->{_title} }