|
version 1.48, 2003/02/07 15:05:37
|
version 1.49, 2003/02/14 19:35:54
|
|
Line 472 ENDHEADERS
|
Line 472 ENDHEADERS
|
| my $script=''; |
my $script=''; |
| my $allowed; |
my $allowed; |
| my $events=''; |
my $events=''; |
| |
my $buttons=''; |
| my $showdoc=0; |
my $showdoc=0; |
| &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
| ['folder','foldername']); |
['folder','foldername']); |
|
Line 490 ENDHEADERS
|
Line 491 ENDHEADERS
|
| } |
} |
| } else { # got called in sequence from course |
} else { # got called in sequence from course |
| $allowed=0; |
$allowed=0; |
| $script='</script>'.&Apache::lonxml::registerurl(1,undef).'<script>'; |
$script='</script>'.&Apache::lonmenu::registerurl(1,undef).'<script>'; |
| $events='onLoad="'.&Apache::lonxml::loadevents. |
$events='onLoad="'.&Apache::lonmenu::loadevents. |
| '" onUnload="'.&Apache::lonxml::unloadevents.'"'; |
'" onUnload="'.&Apache::lonmenu::unloadevents.'"'; |
| |
$buttons=&Apache::lonmenu::menubuttons(1,undef); |
| } |
} |
| |
|
| # get course data |
# get course data |
|
Line 579 ENDNEWSCRIPT
|
Line 581 ENDNEWSCRIPT
|
| } |
} |
| # -------------------------------------------------------------------- Body tag |
# -------------------------------------------------------------------- Body tag |
| $r->print('</head>'. |
$r->print('</head>'. |
| &Apache::loncommon::bodytag('Course Documents','',$events)); |
&Apache::loncommon::bodytag('Course Documents','',$events). |
| |
$buttons); |
| unless ($showdoc) { |
unless ($showdoc) { |
| if ($allowed) { |
if ($allowed) { |
| $r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc', |
$r->print(&Apache::loncommon::help_open_topic('Docs_Adding_Course_Doc', |
![[BACK]](/icons/back.gif){kind=icon}
Return to londocs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface