summaryrefslogtreecommitdiff
path: root/LedgerSMB/Session
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-14 17:31:23 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-10-14 17:31:23 +0000
commite5549057abc64f86547384d7c06f99614332c0f4 (patch)
treede3b1a73bf27f4998a807705f0e3d9b51b0a00a3 /LedgerSMB/Session
parenta4bc02096b38696e5d922689e6ffe7b7645fe6e3 (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-xLedgerSMB/Session/DB.pm4
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: ' );