[LON-CAPA-cvs] cvs: loncom /homework radiobuttonresponse.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 08 Dec 2006 17:38:36 -0000
albertel Fri Dec 8 12:38:36 2006 EDT
Modified files:
/loncom/homework radiobuttonresponse.pm
Log:
- backing out half done patch for now
Index: loncom/homework/radiobuttonresponse.pm
diff -u loncom/homework/radiobuttonresponse.pm:1.108 loncom/homework/radiobuttonresponse.pm:1.109
--- loncom/homework/radiobuttonresponse.pm:1.108 Thu Dec 7 18:10:42 2006
+++ loncom/homework/radiobuttonresponse.pm Fri Dec 8 12:38:35 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# mutliple choice style responses
#
-# $Id: radiobuttonresponse.pm,v 1.108 2006/12/07 23:10:42 albertel Exp $
+# $Id: radiobuttonresponse.pm,v 1.109 2006/12/08 17:38:35 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -32,8 +32,6 @@
use Apache::lonlocal;
use Apache::lonnet;
-my $exam_max_bubbles = 10;
-
BEGIN {
&Apache::lonxml::register('Apache::radiobuttonresponse',('radiobuttonresponse'));
}
@@ -492,19 +490,8 @@
$result .= ' />'.$Apache::response::foilgroup{$name.'.text'}."</label>";
} else {
if ($Apache::lonhomework::type eq 'exam') {
-
- # If necessary, start a new group of bubbles
- # in the next row on the scantron sheet:
- #
- if ($i >= $exam_max_bubbles) {
- $i = 0; # Back to A.
- $Apache::lonxml::counter++; # Next row of bubbles...
- $result .= '\item[\textbf{'.$Apache::lonxml::counter.'}.]';
- }
-
$result .= '{\small \textbf{'.$alphabet[$i].'}}$\bigcirc$'.$Apache::response::foilgroup{$name.'.text'}.'\\\\'; #' stupid emacs
$i++;
-
} else {
$result .= '\vspace*{-2 mm}\item '.$Apache::response::foilgroup{$name.'.text'};
}