allow mailto and irc links in pod content

metacpan · Jun 8, 2016 · ebfe233 · ebfe233
1 parent 1a30f82
commit ebfe233
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/MetaCPAN/Web/Controller/Pod.pm b/lib/MetaCPAN/Web/Controller/Pod.pm
@@ -99,7 +99,7 @@ sub view : Private {
     $self->add_favorites_data( $data, $reqs->{favorites}, $data );
 
     my $hr = HTML::Restrict->new;
-    $hr->set_uri_schemes( [ undef, 'http', 'https', 'data' ] );
+    $hr->set_uri_schemes( [ undef, 'http', 'https', 'data', 'mailto', 'irc', 'ircs' ] );
     $hr->set_rules(
         {
             a       => [qw( href target )],