--- loncom/interface/lonparmset.pm 2003/09/04 01:09:04 1.122 +++ loncom/interface/lonparmset.pm 2003/10/01 21:10:17 1.127 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.122 2003/09/04 01:09:04 www Exp $ +# $Id: lonparmset.pm,v 1.127 2003/10/01 21:10:17 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -948,7 +948,7 @@ sub assessparms { } $r->print("\n"); } else { - my ($map,$id,$resource)=split(/___/,$pssymb); + my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb); $r->print("
'.
"$bighash{'title_'.$rid}");
+ " TARGET=_self>$title");
if ($thistitle) {
$r->print(' ('.$thistitle.')');
@@ -1666,6 +1667,26 @@ ENDENV
}
##################################################
+my $tableopen;
+
+sub tablestart {
+ if ($tableopen) {
+ return '';
+ } else {
+ $tableopen=1;
+ return '
';
+ } else {
+ return'';
+ }
+}
+
sub overview {
my $r=shift;
my $bodytag=&Apache::loncommon::bodytag(
@@ -1678,48 +1699,97 @@ sub overview {
';
+ }
+}
+
+sub tableend {
+ if ($tableopen) {
+ $tableopen=0;
+ return 'Parameter Delete Set to ...