Subversion Repositories ORC

Rev

Rev 24 | Rev 27 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 24 Rev 25
Line 9... Line 9...
9
use tableViewer;
9
use tableViewer;
10
use RollerCon;
10
use RollerCon;
11
our $h = HTML::Tiny->new( mode => 'html' );
11
our $h = HTML::Tiny->new( mode => 'html' );
12
use DateTime;
12
use DateTime;
13
use DateTime::Duration;
13
use DateTime::Duration;
14
my $now = DateTime->now;
14
my $now = DateTime->now (time_zone => 'America/Los_Angeles');
Line 15... Line 15...
15
 
15
 
16
my $cookie_string = authenticate (1) || die;
16
my $cookie_string = authenticate (1) || die;
17
# Add checking to make sure they're in this department
17
# Add checking to make sure they're in this department
18
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
18
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;