X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FConstants.pm;h=dcf35e5b6561012e16d1911f3442d8ce284ff1a2;hb=889475be74f43b938d8dbcb549699c939dfe9d66;hp=7e0b8ea3fad6789717b21cc7da77394c09d6c3b4;hpb=b6e2413ee413ce21b28429c05bbcc3f516a0754a;p=maypole.git

diff --git a/lib/Maypole/Constants.pm b/lib/Maypole/Constants.pm
index 7e0b8ea..dcf35e5 100644
--- a/lib/Maypole/Constants.pm
+++ b/lib/Maypole/Constants.pm
@@ -6,6 +6,8 @@ use constant ERROR    => -1;
 our @EXPORT = qw(OK DECLINED ERROR);
 our $VERSION = "1." . sprintf "%04d", q$Rev$ =~ /: (\d+)/;
 
+1;
+
 =head1 NAME
 
 Maypole::Constants - Maypole predefined constants
@@ -26,7 +28,7 @@ Maypole::Constants - Maypole predefined constants
 
 This class defines constants for use with Maypole
 
-=head1 CONSTANTS
+=head2 CONSTANTS
 
 =head3 OK
 
@@ -51,4 +53,3 @@ Simon Cozens, C<simon@cpan.org>
 You may distribute this code under the same terms as Perl itself.
 
 =cut
-1;