Switch qw delimiters to <>

[perl/modules/rgit.git] / lib / App / Rgit / Policy / Keep.pm

diff --git a/lib/App/Rgit/Policy/Keep.pm b/lib/App/Rgit/Policy/Keep.pm
index 1bbdc5657a564108e51e86a9a3588b43773bf543..43f125fb78805bd512838268c47a2c79d0ace7fa 100644 (file)
--- a/lib/App/Rgit/Policy/Keep.pm
+++ b/lib/App/Rgit/Policy/Keep.pm
@@ -3,9 +3,9 @@ package App::Rgit::Policy::Keep;
 use strict;
 use warnings;
 
-use App::Rgit::Utils qw/:codes/;
+use App::Rgit::Utils qw<:codes>;
 
-use base qw/App::Rgit::Policy/;
+use base qw<App::Rgit::Policy>;
 
 =head1 NAME
 
@@ -13,18 +13,34 @@ App::Rgit::Policy::Keep - A policy that ignores errors.
 
 =head1 VERSION
 
-Version 0.06
+Version 0.08
 
 =cut
 
-our $VERSION = '0.06';
+our $VERSION = '0.08';
 
-sub report { NEXT }
+=head1 DESCRIPTION
+
+This policy always proceed to the next repository even when an error occurs.
+
+=head1 METHODS
+
+This class inherits from L<App::Rgit::Policy>.
+
+It implements :
+
+=head2 C<handle>
+
+=cut
+
+sub handle { NEXT }
 
 =head1 SEE ALSO
 
 L<rgit>.
 
+L<App::Rgit::Policy>.
+
 =head1 AUTHOR
 
 Vincent Pit, C<< <perl at profvince.com> >>, L<http://profvince.com>.