@@ -71,6 +71,7 @@ requires 'SQL::Translator' => '0.08'; requires 'Getopt::Long'; requires 'Pod::Usage'; requires 'DBD::SQLite'; +requires 'Data::Currency'; build_requires 'Test::More' => '0.61'; feature 'Catalyst Support', Makefile.PL @@ -17,7 +17,7 @@ BEGIN { eval 'use Test::MockObject 1.07'; if (!$@) { - plan tests => 14; + plan tests => 13; } else { plan skip_all => 'Test::MockObject 1.07 not installed'; }; @@ -81,17 +81,13 @@ BEGIN { ## throw exception when bogus cart_class is given { - try { + eval { local $ENV{'LANGUAGE'} = 'en'; my $model = Catalyst::Model::Handel::Cart->COMPONENT; fail('no exception thrown'); - } catch Error::Simple with { - pass('caught simple exception'); - like(shift, qr/could not load cart class/i, 'could not load class in message'); - } otherwise { - fail('caught other exception'); }; + like($@, qr/could not load cart class/i, 'could not load class in message'); }; t/catalyst_model_cart.t 148af6091e8fb5652e2ea15eb4d65a7f6b17832b Tomas Doran bobtfish@bobtfish.net http://github.com/claco/handel/commit/ebbceb4c1174c0df687f16e7b2e1c7aee502c548 ebbceb4c1174c0df687f16e7b2e1c7aee502c548 2009-08-09T18:45:17-07:00 2009-08-06T16:05:46-07:00 Fix insane test Signed-off-by: Christopher H. Laco <claco@chrislaco.com> 90778b508ef016e587e7ebd81cb24e0f0b061e51 Christopher H. Laco claco@chrislaco.com