Subversion Repositories VORC

Rev

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

Rev 122 Rev 138
Line 240... Line 240...
240 
  my ($d, $c) = getData (\@displayFields, \@SIWhere, $DBTABLE, $FORM{sortby});
 240 
  my ($d, $c) = getData (\@displayFields, \@SIWhere, $DBTABLE, $FORM{sortby});
241 
  @shifts = @{ $d };
 241 
  @shifts = @{ $d };
242 
}
 242 
}
Line 243... Line 243...
243 
 
 243 
 
Line 244... Line 244...
244 
 
 244 
 
245 
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.";
 245 
my $signedOnAs = $username ? "Welcome, $username. ".$h->a ({ href=>"index.pl?LOGOUT" }, "[Log Out]") : "You are not signed in.";
246 
 
 246 
 
247 
# Set some cookie stuff...
 247 
# Set some cookie stuff...