version 1.77, 2004/01/14 22:59:18
|
version 1.79, 2004/02/13 21:12:54
|
Line 289 sub insert_formularesponse {
|
Line 289 sub insert_formularesponse {
|
<formularesponse answer="" samples=""> |
<formularesponse answer="" samples=""> |
<textline /> |
<textline /> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</formularesponse>'; |
</formularesponse>'; |
} |
} |
Line 300 sub insert_numericalresponse {
|
Line 299 sub insert_numericalresponse {
|
<numericalresponse answer=""> |
<numericalresponse answer=""> |
<textline /> |
<textline /> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</numericalresponse>'; |
</numericalresponse>'; |
} |
} |
Line 311 sub insert_stringresponse {
|
Line 309 sub insert_stringresponse {
|
<stringresponse answer="" type=""> |
<stringresponse answer="" type=""> |
<textline /> |
<textline /> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</stringresponse>'; |
</stringresponse>'; |
} |
} |
Line 330 sub insert_imageresponse {
|
Line 327 sub insert_imageresponse {
|
<foilgroup> |
<foilgroup> |
</foilgroup> |
</foilgroup> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</imageresponse>'; |
</imageresponse>'; |
} |
} |
Line 342 sub insert_optionresponse {
|
Line 338 sub insert_optionresponse {
|
<foilgroup options=""> |
<foilgroup options=""> |
</foilgroup> |
</foilgroup> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</optionresponse>'; |
</optionresponse>'; |
} |
} |
Line 353 sub insert_organicresponse {
|
Line 348 sub insert_organicresponse {
|
<organicresponse> |
<organicresponse> |
<textline /> |
<textline /> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</organicresponse>'; |
</organicresponse>'; |
} |
} |
Line 371 sub insert_radiobuttonresponse {
|
Line 365 sub insert_radiobuttonresponse {
|
<foilgroup> |
<foilgroup> |
</foilgroup> |
</foilgroup> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</radiobuttonresponse>'; |
</radiobuttonresponse>'; |
} |
} |
Line 382 sub insert_reactionresponse {
|
Line 375 sub insert_reactionresponse {
|
<reactionresponse> |
<reactionresponse> |
<textline /> |
<textline /> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</reactionresponse>'; |
</reactionresponse>'; |
} |
} |
Line 394 sub insert_rankresponse {
|
Line 386 sub insert_rankresponse {
|
<foilgroup options=""> |
<foilgroup options=""> |
</foilgroup> |
</foilgroup> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</rankresponse>'; |
</rankresponse>'; |
} |
} |
Line 408 sub insert_matchresponse {
|
Line 399 sub insert_matchresponse {
|
</itemgroup> |
</itemgroup> |
</foilgroup> |
</foilgroup> |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup> |
</hintgroup> |
</matchresponse>'; |
</matchresponse>'; |
} |
} |
Line 427 sub insert_hintpart {
|
Line 417 sub insert_hintpart {
|
sub insert_hintgroup { |
sub insert_hintgroup { |
return ' |
return ' |
<hintgroup> |
<hintgroup> |
<startouttext/> |
<startouttext /><endouttext /> |
<endouttext /> |
|
</hintgroup>'; |
</hintgroup>'; |
} |
} |
|
|
Line 463 sub insert_optionhint {
|
Line 452 sub insert_optionhint {
|
} |
} |
|
|
sub insert_startouttext { |
sub insert_startouttext { |
return "<startouttext />\n<endouttext />"; |
return "<startouttext /><endouttext />"; |
} |
} |
|
|
sub insert_script { |
sub insert_script { |
return "\n<script type=\"loncapa/perl\">\n</script>"; |
return "\n<script type=\"loncapa/perl\"></script>"; |
} |
} |
|
|
sub textarea_sizes { |
sub textarea_sizes { |
Line 543 sub get_new_args {
|
Line 532 sub get_new_args {
|
$token->[2]->{$arg}=$newvalue; |
$token->[2]->{$arg}=$newvalue; |
} |
} |
$rebuild=1; |
$rebuild=1; |
|
} elsif (!defined($newvalue) && defined($value)) { |
|
delete($token->[2]->{$arg}); |
|
$rebuild=1; |
} |
} |
} |
} |
return $rebuild; |
return $rebuild; |