Fixed bug with updating session when expiry_threshold is set

[catagits/Catalyst-Plugin-Session.git] / t / live_expiry_threshold.t

diff --git a/t/live_expiry_threshold.t b/t/live_expiry_threshold.t
index ea3f83f..75beb64 100644 (file)
--- a/t/live_expiry_threshold.t
+++ b/t/live_expiry_threshold.t
@@ -43,7 +43,10 @@ $res = $ua->get( "http://localhost/session_expires" );
 ok($res->is_success, "session_expires");
 is($res->decoded_content, $expiry, "session_expires == session_data_expires");
 
-sleep(10);
+#
+
+$res = $ua->get( "http://localhost/update_session" );
+ok($res->is_success, "update_session");
 
 $res = $ua->get( "http://localhost/session_data_expires" );
 ok($res->is_success, "session_data_expires");
@@ -51,6 +54,25 @@ ok($res->is_success, "session_data_expires");
 my $updated = $res->decoded_content + 0;
 ok($updated > $expiry, "expiration updated");
 
+$expiry = $updated;
+
+$res = $ua->get( "http://localhost/session_data_expires" );
+ok($res->is_success, "session_data_expires");
+
+is($res->decoded_content, $expiry, "expiration not updated");
+
+$res = $ua->get( "http://localhost/session_expires" );
+ok($res->is_success, "session_expires");
+is($res->decoded_content, $expiry, "session_expires == session_data_expires");
+
+sleep(10);
+
+$res = $ua->get( "http://localhost/session_data_expires" );
+ok($res->is_success, "session_data_expires");
+
+$updated = $res->decoded_content + 0;
+ok($updated > $expiry, "expiration updated");
+
 $res = $ua->get( "http://localhost/session_expires" );
 ok($res->is_success, "session_expires");
 is($res->decoded_content, $updated, "session_expires == session_data_expires");