--- 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 }