X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FConstants.pm;h=b70a06ceb79f7e10bd8e547ddb357d83451ad902;hb=d7d451f187ce62da9bb9a30c7692ca9a40a06a48;hp=4078b83bccb01ba6038baa8ca80e7f50ae274239;hpb=d3a3498e58b23918b3311da94f706bbfe2a576ee;p=maypole.git diff --git a/lib/Maypole/Constants.pm b/lib/Maypole/Constants.pm index 4078b83..b70a06c 100644 --- a/lib/Maypole/Constants.pm +++ b/lib/Maypole/Constants.pm @@ -3,9 +3,9 @@ use strict; use base 'Exporter'; use constant OK => 0; use constant DECLINED => -1; -use constant ERROR => -1; +use constant ERROR => 500; our @EXPORT = qw(OK DECLINED ERROR); -our $VERSION = "1." . sprintf "%04d", q$Rev$ =~ /: (\d+)/; +our $VERSION = "1." . sprintf "%04d", q$Rev: 483 $ =~ /: (\d+)/; 1; @@ -43,7 +43,7 @@ L =head1 MAINTAINER -Sebastian Riedel, c +Aaron Trevena, c =head1 AUTHOR