--- loncom/homework/optionresponse.pm 2008/11/12 20:32:29 1.154 +++ loncom/homework/optionresponse.pm 2008/12/10 21:48:21 1.157 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.154 2008/11/12 20:32:29 jms Exp $ +# $Id: optionresponse.pm,v 1.157 2008/12/10 21:48:21 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -27,108 +27,7 @@ # -=head1 NAME - -Apache::optionresponse.pm; - -=head1 SYNOPSIS - -Handles tags associated with showing a list of -options. - -This is part of the LearningOnline Network with CAPA project -described at http://www.lon-capa.org. - -=head1 HANDLER SUBROUTINE - -start_optionresponse() - -=head1 OTHER SUBROUTINES - -=over - -=item * - -end_optionresponse() - -=item * - -start_foilgroup() - -=item * - -end_foilgroup() - -=item * - -getfoilcounts() - -=item * - -displayanswers() - -=item * - -check_for_invalid() - -=item * - -displayfoils() - -=item * - -optionlist_correction() - -=item * - -webbubbles() - -=item * - -bubbles() - -=item * - -start_conceptgroup() - -=item * - -end_conceptgroup() - -=item * - -insert_conceptgroup() - - -=item * - -start_foil() - -=item * - -end_foil() - -=item * - -start_drawoptionlist() -=item * - -end_drawoptionlist() - -=item * - -insert_foil() - -=item * - -insert_drawoptionlist() - -=item * - -=back - -=cut package Apache::optionresponse; @@ -166,8 +65,8 @@ sub start_optionresponse { &Apache::edit::select_arg('Randomize Foil Order:','randomize', ['yes','no'],$token). &Apache::edit::select_arg(&mt('Display of options when printed'),'TeXlayout', - [['horizontal',&mt('Normal list')], - ['vertical',&mt('Listed in a vertical column')]],$token). + [['horizontal','Normal list'], + ['vertical','Listed in a vertical column']],$token). &Apache::edit::end_row().&Apache::edit::start_spanning_row(); } elsif ($target eq 'modified') { my $constructtag=&Apache::edit::get_new_args($token,$parstack, @@ -882,3 +781,64 @@ sub insert_drawoptionlist { 1; __END__ +=head1 NAME + +Apache::optionresponse.pm; + +=head1 SYNOPSIS + +Handles tags associated with showing a list of +options. + +This is part of the LearningOnline Network with CAPA project +described at http://www.lon-capa.org. + +=head1 HANDLER SUBROUTINE + +start_optionresponse() + +=head1 OTHER SUBROUTINES + +=over + +=item end_optionresponse() + +=item start_foilgroup() + +=item end_foilgroup() + +=item getfoilcounts() + +=item displayanswers() + +=item check_for_invalid() + +=item displayfoils() + +=item optionlist_correction() + +=item webbubbles() + +=item bubbles() + +=item start_conceptgroup() + +=item end_conceptgroup() + +=item insert_conceptgroup() + +=item start_foil() + +=item end_foil() + +=item start_drawoptionlist() + +=item end_drawoptionlist() + +=item insert_foil() + +=item insert_drawoptionlist() + +=back + +=cut