Subversion Repositories VORC

Rev

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

Rev 122 Rev 138
Line 236... Line 236...
236 
  my ($d, $c) = getData (\@displayFields, \@SIWhere, $DBTABLE, $FORM{sortby});
 236 
  my ($d, $c) = getData (\@displayFields, \@SIWhere, $DBTABLE, $FORM{sortby});
237 
  @shifts = @{ $d };
 237 
  @shifts = @{ $d };
238 
}
 238 
}
Line 239... Line 239...
239 
 
 239 
 
Line 240... Line 240...
240 
 
 240 
 
241 
my $signedOnAs = $username ? "Welcome, $username. ".$h->a ({ href=>"index.pl", onClick=>"document.cookie = 'RCAUTH=; expires=Thu, 01 Jan 1970 00:00:01 GMT; path=/';return true;" }, "[Log Out]") : "You are not signed in.";
 241 
my $signedOnAs = $username ? "Welcome, $username. ".$h->a ({ href=>"index.pl?LOGOUT" }, "[Log Out]") : "You are not signed in.";
242 
 
 242 
 
243 
# Set some cookie stuff...
 243 
# Set some cookie stuff...