--- loncom/homework/radiobuttonresponse.pm	2008/11/14 21:27:17	1.137
+++ loncom/homework/radiobuttonresponse.pm	2008/11/18 19:14:28	1.138
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # mutliple choice style responses
 #
-# $Id: radiobuttonresponse.pm,v 1.137 2008/11/14 21:27:17 jms Exp $
+# $Id: radiobuttonresponse.pm,v 1.138 2008/11/18 19:14:28 jms Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -37,53 +37,31 @@ Handles multiple-choice style responses.
 This is part of the LearningOnline Network with CAPA project
 described at http://www.lon-capa.org.
 
-=head1 HANDLER SUBROUTINE
-
-start_radiobuttonresponse()
-
-=head1 OTHER SUBROUTINES
+=head1 SUBROUTINES
 
 =over
 
-=item *
-
-bubble_line_count()
-
-=item *
-
-end_radiobuttonresponse()
-
-=item *
-
-start_foilgroup()
-
-=item *
-
-storesurvey()
-
-=item *
+=item start_radiobuttonresponse()
 
-grade_response()
+=item bubble_line_count()
 
-=item *
+=item end_radiobuttonresponse()
 
-end_foilgroup()
+=item start_foilgroup()
 
-=item *
+=item storesurvey()
 
-getfoilcounts()
+=item grade_response()
 
-=item *
+=item end_foilgroup()
 
-format_prior_answer()
+=item getfoilcounts()
 
-=item *
+=item format_prior_answer()
 
-displayallfoils()
+=item displayallfoils()
 
-=item *
-
-&whichfoils($max,$randomize)
+=item &whichfoils($max,$randomize)
 
 Randomizes the list of foils.
 Respects
@@ -107,41 +85,23 @@ Returns
   $answer - location in the array of the correct answer
   @foils  - array of foil names in to display order
 
-=item *
-
-displayfoils()
-
-=item *
-
-displayallanswers()
-
-=item *
-
-displayanswers()
-
-=item *
-
-start_conceptgroup()
-
-=item *
-
-end_conceptgroup()
+=item displayfoils()
 
-=item *
+=item displayallanswers()
 
-insert_conceptgroup()
+=item displayanswers()
 
-=item *
+=item start_conceptgroup()
 
-start_foil()
+=item end_conceptgroup()
 
-=item *
+=item insert_conceptgroup()
 
-end_foil()
+=item start_foil()
 
-=item *
+=item end_foil()
 
-insert_foil()
+=item insert_foil()
 
 =back