diff --git a/t/lib/WebGUI/Test.pm b/t/lib/WebGUI/Test.pm index 89af2bbdc..149afa788 100644 --- a/t/lib/WebGUI/Test.pm +++ b/t/lib/WebGUI/Test.pm @@ -106,6 +106,9 @@ BEGIN { } END { + my $Test = Test::Builder->new; + $Test->diag('Sessions: '.$SESSION->db->quickScalar('select count(*) from userSession')); + $Test->diag('Scratch : '.$SESSION->db->quickScalar('select count(*) from userSessionScratch')); $SESSION->var->end; $SESSION->close if defined $SESSION; }