X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FConstants.pm;h=b70a06ceb79f7e10bd8e547ddb357d83451ad902;hb=83769a6653a8736141d035a8a963c6cc99970a17;hp=9c018f9325f4e7782723fd3d77abd0bde00edcac;hpb=b8b992790ac51e41943f2747b52afed0228885c6;p=maypole.git diff --git a/lib/Maypole/Constants.pm b/lib/Maypole/Constants.pm index 9c018f9..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: 354 $ =~ /: (\d+)/; +our $VERSION = "1." . sprintf "%04d", q$Rev: 483 $ =~ /: (\d+)/; 1;