diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-14 17:31:23 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-14 17:31:23 +0000 |
commit | e5549057abc64f86547384d7c06f99614332c0f4 (patch) | |
tree | de3b1a73bf27f4998a807705f0e3d9b51b0a00a3 /LedgerSMB/Session | |
parent | a4bc02096b38696e5d922689e6ffe7b7645fe6e3 (diff) |
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
Diffstat (limited to 'LedgerSMB/Session')
-rwxr-xr-x | LedgerSMB/Session/DB.pm | 4 |
1 files changed, 2 insertions, 2 deletions
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: ' ); |