--- loncom/interface/lonparmset.pm 2000/11/28 11:23:15 1.17 +++ loncom/interface/lonparmset.pm 2000/12/12 21:33:50 1.20 @@ -9,7 +9,8 @@ # # 10/11,10/12,10/16 Gerd Kortemeyer) # -# 11/20,11/21,11/22,11/23,11/24,11/25,11/27,11/28 Gerd Kortemeyer +# 11/20,11/21,11/22,11/23,11/24,11/25,11/27,11/28, +# 12/08,12/12 Gerd Kortemeyer package Apache::lonparmset; @@ -250,7 +251,7 @@ sub handler { $allkeys{$allkey}=$display; if ($allkey eq $fcat) { $defp{$id}= - &Apache::lonnet::metadata($srcf,$key.'.default'); + &Apache::lonnet::metadata($srcf,$key); } if ($keyp{$id}) { $keyp{$id}.=','.$key; @@ -389,8 +390,7 @@ sub handler { function psub() { pclose(); - if ((document.parmform.pres_value.value!='') && - (document.parmform.pres_marker.value!='')) { + if (document.parmform.pres_marker.value!='') { document.parmform.submit(); } else { document.parmform.pres_value.value=''; @@ -461,8 +461,20 @@ ENDTABLEHEADFOUR $r->print('
'. $bighash{'title_'.$rid}); @@ -493,58 +506,73 @@ ENDTABLEHEADFOUR $r->print(' ('.$thistitle.')'); } $r->print('