| Line 162... |
Line 162... |
| 162 |
}
|
162 |
}
|
| Line 163... |
Line 163... |
| 163 |
|
163 |
|
| Line 164... |
Line 164... |
| 164 |
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.";
|
164 |
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.";
|
| 165 |
|
165 |
|
| 166 |
# Set some cookie stuff...
|
166 |
# Set some cookie stuff...
|
| 167 |
my $path = `dirname $ENV{REQUEST_URI}`; chomp $path; $path .= '/' unless $path eq "/";
|
167 |
my $path = `dirname $ENV{SCRIPT_NAME}`; chomp $path; $path .= '/' unless $path eq "/";
|
| 168 |
my $queryCookie = cookie(-NAME=>$prefscookie,
|
168 |
my $queryCookie = cookie(-NAME=>$prefscookie,
|
| 169 |
-VALUE=>"$QUERY_STRING",
|
169 |
-VALUE=>"$QUERY_STRING",
|
| Line 327... |
Line 327... |
| 327 |
$h->br,
|
327 |
$h->br,
|
| 328 |
$h->a ({ href=>"", target=>"_new", onClick=>"window.document.Req.excel.value=1; window.document.Req.submit(); window.document.Req.excel.value=0; return false;" }, "[Export Displayed Data as an Excel Document.]"),
|
328 |
$h->a ({ href=>"", target=>"_new", onClick=>"window.document.Req.excel.value=1; window.document.Req.submit(); window.document.Req.excel.value=0; return false;" }, "[Export Displayed Data as an Excel Document.]"),
|
| 329 |
$h->br,
|
329 |
$h->br,
|
| 330 |
"This page was displayed on ", currentTime (),
|
330 |
"This page was displayed on ", currentTime (),
|
| 331 |
$h->br,
|
331 |
$h->br,
|
| 332 |
"Please direct questions, problems, and concerns to Officials.RollerCon.Schedule\@gmail.com",
|
332 |
"Please direct questions, problems, and concerns to $SYSTEM_EMAIL",
|
| 333 |
# $h->br,
|
333 |
# $h->br,
|
| 334 |
# "Displaying: ", $h->select ({ name=>"year", onchange=>"Req.submit();" }, [ @yearoptions ])
|
334 |
# "Displaying: ", $h->select ({ name=>"year", onchange=>"Req.submit();" }, [ @yearoptions ])
|
| 335 |
])
|
335 |
])
|
| 336 |
]),
|
336 |
]),
|
| 337 |
$h->div ({ class=>"spRight" }, [
|
337 |
$h->div ({ class=>"spRight" }, [
|