--- loncom/interface/londocs.pm 2007/06/28 23:26:46 1.278.2.1
+++ loncom/interface/londocs.pm 2007/06/29 19:51:06 1.278.2.2
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.278.2.1 2007/06/28 23:26:46 albertel Exp $
+# $Id: londocs.pm,v 1.278.2.2 2007/06/29 19:51:06 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1894,7 +1894,7 @@ END
$url.=(($url=~/\?/)?'&':'?').'symb='.&escape($symb);
}
}
- my $parameterset=' ';
+ my ($parameterset,$rand_order_text) = (' ', ' ');
if ($isfolder || $extension eq 'sequence') {
my $foldername=&escape($foldertitle);
my $folderpath=$env{'form.folderpath'};
@@ -1917,6 +1917,10 @@ END
'" />'.
''.&mt('Save').'';
+ my $ro_set=
+ ((&LONCAPA::map::getparameter($orderidx,'parameter_randomorder'))[0]=~/^yes$/i?' checked="checked"':'');
+ $rand_order_text ='
+';
}
if ($ispage) {
my $pagename=&escape($pagetitle);
@@ -1943,21 +1947,18 @@ END
if (($allowed) && ($folder!~/^supplemental/)) {
my %lt=&Apache::lonlocal::texthash(
'hd' => 'Hidden',
- 'ec' => 'URL hidden',
- 'ro' => 'Random Order',);
+ 'ec' => 'URL hidden');
my $enctext=
((&LONCAPA::map::getparameter($orderidx,'parameter_encrypturl'))[0]=~/^yes$/i?' checked="checked"':'');
my $hidtext=
((&LONCAPA::map::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i?' checked="checked"':'');
- my $rotext=
- ((&LONCAPA::map::getparameter($orderidx,'parameter_randomorder'))[0]=~/^yes$/i?' checked="checked"':'');
+
$line.=(<
|
-
- |
+$rand_order_text |
$parameterset |
ENDPARMS
}