--- loncom/interface/lonhelper.pm 2003/05/02 19:20:51 1.17
+++ loncom/interface/lonhelper.pm 2003/05/07 18:22:43 1.21
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# .helper XML handler to implement the LON-CAPA helper
#
-# $Id: lonhelper.pm,v 1.17 2003/05/02 19:20:51 bowersj2 Exp $
+# $Id: lonhelper.pm,v 1.21 2003/05/07 18:22:43 bowersj2 Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -997,17 +997,20 @@ sub render {
if ($self->{'multichoice'}) {
$result .= <
SCRIPT
$buttons = <
BUTTONS
}
@@ -1474,10 +1477,10 @@ sub render {
if ($self->{'multichoice'}) {
$result = <
SCRIPT
$buttons = <
BUTTONS
}
@@ -1682,7 +1689,7 @@ BUTTONS
$checked = 1;
}
$result .=
- " value='" . HTML::Entities::encode($_)
+ " value='" . HTML::Entities::encode($_ . ':' . $choices->{$_}->[$section])
. "' />