changed error code constant, and related test

[maypole.git] / t / constants.t

diff --git a/t/constants.t b/t/constants.t
index 89759c73e49f18a9f3507183c3b086c10aadf65c..1e70cd4bcf1d3a04b752ac0ca8312022fc476c29 100755 (executable)
--- 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');