--- loncom/interface/lonhelper.pm 2005/07/07 04:16:01 1.106 +++ loncom/interface/lonhelper.pm 2005/07/07 04:32:59 1.108 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # .helper XML handler to implement the LON-CAPA helper # -# $Id: lonhelper.pm,v 1.106 2005/07/07 04:16:01 albertel Exp $ +# $Id: lonhelper.pm,v 1.108 2005/07/07 04:32:59 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3268,6 +3268,11 @@ sub render { 'answer_date' => "0_answerdate", 'tries' => '0_maxtries', 'weight' => '0_weight' ); + my %realParmName = ('open_date' => "opendate", + 'due_date' => "duedate", + 'answer_date' => "answerdate", + 'tries' => 'maxtries', + 'weight' => 'weight' ); my $affectedResourceId = ""; my $parm_name = $parmTypeHash{$vars->{ACTION_TYPE}}; @@ -3326,15 +3331,14 @@ sub render { my $result = "
\n"; $result .= "\n"; $result .= "\n"; - if ($vars->{ACTION_TYPE} eq 'tries') { - $result .= "\n"; - } else { - $result .= "&\"") . "' />\n"; - } + $result .= "\n"; if ($vars->{GRANULARITY} eq 'resource') { $result .= "&\"") . "' />\n"; + } elsif ($vars->{GRANULARITY} eq 'map') { + $result .= "\n"; } my $part = $vars->{RESOURCE_ID_part}; if ($part eq 'All Parts' || !$part) { $part=0; } @@ -3421,7 +3425,6 @@ sub render { # Make the table appear $result .= "\n"; - $result .= "\n"; $result .= "\n"; $result .= "\n";