version 1.106, 2010/01/31 06:03:55
|
version 1.108, 2010/03/10 14:20:53
|
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 |
Line 362 ENDSCRIPT
|
Line 356 ENDSCRIPT
|
&Apache::lonannounce::readcalendar($cdom.'_'.$cnum)); |
&Apache::lonannounce::readcalendar($cdom.'_'.$cnum)); |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
if ($allowed) { |
if ($allowed) { |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_Box'); |
&Apache::lontemplate::print_start_template($r,&mt('RSS Feeds and Blogs'),'LC_Box'); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html'; |
my $editurl= &Apache::lonnet::absolute_url().'/adm/'.$cdom.'/'.$cnum.'/_rss.html'; |
$r->print( '<a href="'.$editurl.'">'.&mt('New RSS Feed or Blog').'</a>'); |
$r->print( '<a href="'.$editurl.'">'.&mt('New RSS Feed or Blog').'</a>'); |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
} elsif (&Apache::lonrss::advertisefeeds($cnum,$cdom) ne '') { |
} elsif (&Apache::lonrss::advertisefeeds($cnum,$cdom) ne '') { |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_Box'); |
&Apache::lontemplate::print_start_template($r,&mt('RSS Feeds and Blogs'),'LC_Box'); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom,$forceedit)); |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
} |
} |