version 1.106, 2010/01/31 06:03:55
|
version 1.107, 2010/03/03 21:33:15
|
Line 52 sub handler {
|
Line 52 sub handler {
|
my (undef,undef,$cdom,$cnum)=split(/\//,$r->uri); |
my (undef,undef,$cdom,$cnum)=split(/\//,$r->uri); |
# ------------------------------------------------------------ Get query string |
# ------------------------------------------------------------ Get query string |
&Apache::loncommon::get_unprocessed_cgi |
&Apache::loncommon::get_unprocessed_cgi |
($ENV{'QUERY_STRING'},['forcestudent','register','forceedit','wrapperdisplay']); |
($ENV{'QUERY_STRING'},['forcestudent','register','forceedit']); |
# ----------------------------------------------------- Is this even a course? |
# ----------------------------------------------------- Is this even a course? |
my $homeserver=&Apache::lonnet::homeserver($cnum,$cdom); |
my $homeserver=&Apache::lonnet::homeserver($cnum,$cdom); |
if ($homeserver eq 'no_host') { |
if ($homeserver eq 'no_host') { |
Line 74 sub handler {
|
Line 74 sub handler {
|
my $externalsyllabus=$courseenv{'externalsyllabus'}; |
my $externalsyllabus=$courseenv{'externalsyllabus'}; |
|
|
if ($externalsyllabus=~/\w/) { |
if ($externalsyllabus=~/\w/) { |
|
$r->print( Apache::lonwrapper::wrapper($externalsyllabus) ); |
if ($env{'form.wrapperdisplay'} eq 'menu') { |
return OK; |
$r->print(&Apache::lonwrapper::simple_menu()); |
|
} else { |
|
$r->print(&Apache::lonwrapper::wrapper("/public/$cdom/$cnum/syllabus?wrapperdisplay=menu", |
|
$externalsyllabus)); |
|
} |
|
return OK; |
|
} |
} |
|
|
# ------------------------------ The buck stops here: internal syllabus display |
# ------------------------------ The buck stops here: internal syllabus display |