X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=t%2Fconstants.t;h=1e70cd4bcf1d3a04b752ac0ca8312022fc476c29;hb=a4c30c9757a710511bcfabe5cad9a7390eabfbcd;hp=89759c73e49f18a9f3507183c3b086c10aadf65c;hpb=b65ee86d592a4038c2bd7f354a29894145758893;p=maypole.git

diff --git a/t/constants.t b/t/constants.t
index 89759c7..1e70cd4 100755
--- a/t/constants.t
+++ b/t/constants.t
@@ -8,6 +8,6 @@ ok($Maypole::Constants::VERSION, 'defines $VERSION');
 is(\&OK, \&Maypole::Constants::OK, 'exports OK');
 is(OK(), 0, 'OK correctly defined');
 is(\&ERROR, \&Maypole::Constants::ERROR, 'exports ERROR');
-is(ERROR(), -1, 'ERROR correctly defined');
+is(ERROR(), 500, 'ERROR correctly defined');
 is(\&DECLINED, \&Maypole::Constants::DECLINED, 'exports DECLINED');
 is(DECLINED(), -1, 'DECLINED correctly defined');