version 1.33, 2006/03/21 20:41:40
|
version 1.35, 2006/04/10 19:59:53
|
Line 50 sub handler {
|
Line 50 sub handler {
|
my (undef,undef,undef,undef,$marker)=split(/\//,$r->uri); |
my (undef,undef,undef,undef,$marker)=split(/\//,$r->uri); |
# Is this even in a course? |
# Is this even in a course? |
if (!$env{'request.course.id'}) { |
if (!$env{'request.course.id'}) { |
$r->print(&Apache::loncommon::start_page('Not in a course'). |
&Apache::loncommon::simple_error_page($r,'Not in a course', |
&mt('Not in a course'). |
'Not in a course'); |
&Apache::loncommon::end_page()); |
|
return OK; |
return OK; |
} |
} |
|
|
$marker=~s/\D//g; |
$marker=~s/\D//g; |
|
|
if (!$marker) { |
if (!$marker) { |
$r->print(&Apache::loncommon::start_page('Invalid Call'). |
&Apache::loncommon::simple_error_page($r,'Invalid Call', |
&mt('Invalid Call'). |
'Invalid Call'); |
&Apache::loncommon::end_page()); |
|
return OK; |
return OK; |
} |
} |
|
|
Line 78 sub handler {
|
Line 76 sub handler {
|
&Apache::loncommon::get_unprocessed_cgi |
&Apache::loncommon::get_unprocessed_cgi |
($ENV{'QUERY_STRING'},['forcestudent','forceedit','register','origpage']); |
($ENV{'QUERY_STRING'},['forcestudent','forceedit','register','origpage']); |
# ----------------------------------------------------- Force menu registration |
# ----------------------------------------------------- Force menu registration |
my $addentries=''; |
my %addentries; |
if ($env{'form.register'}) { |
if ($env{'form.origpage'}) { |
$addentries=' onLoad="'.&Apache::lonmenu::loadevents(); |
$addentries{'onload'} = "document.location='#newpost';"; |
if ($env{'form.origpage'}) { |
|
$addentries .= "document.location='#newpost';"; |
|
} |
|
$addentries .= '" onUnload="'.&Apache::lonmenu::unloadevents().'"'; |
|
$r->print(&Apache::lonmenu::registerurl(1)); |
|
} elsif ($env{'form.origpage'}) { |
|
$addentries = "onLoad=\"document.location='#newpost';\""; |
|
} |
} |
# --------------------------------------------------------------- Force Student |
# --------------------------------------------------------------- Force Student |
my $forcestudent=''; |
my $forcestudent=''; |
Line 103 sub handler {
|
Line 94 sub handler {
|
my $start_page = |
my $start_page = |
&Apache::loncommon::start_page("Bulletin Board/Discussion",undef, |
&Apache::loncommon::start_page("Bulletin Board/Discussion",undef, |
{'function' => $forcestudent, |
{'function' => $forcestudent, |
'add_entries' => $addentries, |
'add_entries' => \%addentries, |
'domain' => $dom, |
'domain' => $dom, |
'force_register' => |
'force_register' => |
$env{'form.register'}}); |
$env{'form.register'}}); |