--- loncom/interface/londocs.pm 2004/09/18 17:06:57 1.146
+++ loncom/interface/londocs.pm 2004/11/11 22:47:55 1.149
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.146 2004/09/18 17:06:57 albertel Exp $
+# $Id: londocs.pm,v 1.149 2004/11/11 22:47:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -989,15 +989,17 @@ sub editor {
# ---------------------------------------------------------------- End commands
# ---------------------------------------------------------------- Print screen
my $idx=0;
+ my $shown=0;
$r->print('
');
foreach (@Apache::lonratedt::order) {
my ($name,$url)=split(/\:/,$Apache::lonratedt::resources[$_]);
unless ($name) { $name=(split(/\//,$url))[-1]; }
- unless ($name) { next; }
+ unless ($name) { $idx++; next; }
$r->print(&entryline($idx,$name,$url,$folder,$allowed,$_,$coursenum));
$idx++;
+ $shown++;
}
- unless ($idx) {
+ unless ($shown) {
$r->print(''.&mt('Currently no documents.').' |
');
}
$r->print('
');
@@ -1161,9 +1163,12 @@ END
if ($folderpath) { $folderpath.='&' };
$folderpath.=$folderarg.'&'.$foldername;
$url.='folderpath='.&Apache::lonnet::escape($folderpath);
- $parameterset=&mt('Randomly Pick: ').
+ $parameterset='';
+
}
if ($ispage) {
my $pagename=&Apache::lonnet::escape($pagetitle);
@@ -1187,9 +1192,9 @@ END
((&Apache::lonratedt::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i?' checked="1"':'');
$line.=(<
- $lt{'hd'}
-
+
+
+ |
$parameterset |
|