From: Maurice Aubrey <maurice.aubrey@gmail.com>
Date: Wed, 30 May 2007 20:36:58 +0000 (+0000)
Subject: add check to make sure finalize_session() was actually called
X-Git-Tag: v0.15~1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=455d7130abb64614517629adc52581bf65c9c2ce;p=catagits%2FCatalyst-Plugin-Session.git

add check to make sure finalize_session() was actually called
---

diff --git a/t/06_finalize.t b/t/06_finalize.t
index b668f77..6b07b8e 100644
--- a/t/06_finalize.t
+++ b/t/06_finalize.t
@@ -3,12 +3,13 @@
 use strict;
 use warnings;
 
-use Test::More tests => 2;
+use Test::More tests => 3;
+
+my $finalized = 0;
 
 {
   package TestPlugin;
 
-  my $finalized = 0;
   sub finalize_session { $finalized = 1 }
 
   sub finalize { die "already finalized_session()" if $finalized }
@@ -28,3 +29,4 @@ BEGIN { use_ok('Catalyst::Plugin::Session') }
 my $c = TestApp->new;
 eval { $c->finalize };
 ok(!$@, "finalize_session() called after all other finalize() methods");
+ok($finalized, "finalize_session() called");