--- loncom/interface/londocs.pm 2004/07/01 21:54:24 1.132
+++ loncom/interface/londocs.pm 2004/07/08 19:58:29 1.135
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.132 2004/07/01 21:54:24 www Exp $
+# $Id: londocs.pm,v 1.135 2004/07/08 19:58:29 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -201,7 +201,8 @@ sub dumpcourse {
$r->print(
'');
} else {
- $r->print('');
+ $r->print('');
}
}
}
@@ -574,13 +575,15 @@ END
my $isfolder=0;
my $folderarg;
if ($uploaded) {
- if ($extension eq 'sequence') {
- $icon=$iconpath.'/folder_closed.gif';
- $url=~/$coursenum\/([\/\w]+)\.sequence$/;
- $url='/adm/coursedocs?';
- $folderarg=$1;
- $isfolder=1;
- }
+ if ($extension eq 'sequence') {
+ $icon=$iconpath.'/folder_closed.gif';
+ $url=~/$coursenum\/([\/\w]+)\.sequence$/;
+ $url='/adm/coursedocs?';
+ $folderarg=$1;
+ $isfolder=1;
+ } else {
+ &Apache::lonnet::allowuploaded('/adm/coursedoc',$url);
+ }
}
$url=~s/^http\&colon\;\/\//\/adm\/wrapper\/ext\//;
if ((!$isfolder) && ($residx) && ($folder!~/supplemental/)) {
@@ -1223,8 +1226,7 @@ ENDNEWSCRIPT
$r->print(''.
&Apache::loncommon::bodytag('Course Documents','',$events,
'','',$showdoc).
- &Apache::loncommon::help_open_faq(273).
- &Apache::loncommon::help_open_bug('RAT'));
+ &Apache::loncommon::help_open_menu('','','','',273,'RAT'));
unless ($showdoc) {
# -----------------------------------------------------------------------------
my %lt=&Apache::lonlocal::texthash(