From e5549057abc64f86547384d7c06f99614332c0f4 Mon Sep 17 00:00:00 2001 From: einhverfr Date: Sun, 14 Oct 2007 17:31:23 +0000 Subject: Moving menus to unorderded lists. CSS still need a few changes, but this is waiting on permission to use nice + and - graphics. git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1752 4979c152-3d1c-0410-bac9-87ea11338e46 --- LedgerSMB/Session/DB.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'LedgerSMB') diff --git a/LedgerSMB/Session/DB.pm b/LedgerSMB/Session/DB.pm index 06385a8f..98694774 100755 --- a/LedgerSMB/Session/DB.pm +++ b/LedgerSMB/Session/DB.pm @@ -34,12 +34,13 @@ use strict; sub session_check { use Time::HiRes qw(gettimeofday); my ( $cookie, $form ) = @_; - + print STFERR "Checking Session\n"; my $path = ($ENV{SCRIPT_NAME}); $path =~ s|[^/]*$||; if ($cookie eq 'Login'){ + print STDERR "creating session\n"; return session_create($form); } my $timeout; @@ -179,7 +180,6 @@ sub session_create { if ( !$lsmb->{timeout} ) { $lsmb->{timeout} = 86400; } - print STDERR "Breakpoint\n"; $deleteExisting->execute( $login) || $lsmb->dberror( __FILE__ . ':' . __LINE__ . ': Delete from session: ' ); -- cgit v1.2.3