--- loncom/homework/radiobuttonresponse.pm 2003/01/07 22:13:07 1.63
+++ loncom/homework/radiobuttonresponse.pm 2003/04/02 15:09:00 1.64
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# mutliple choice style responses
#
-# $Id: radiobuttonresponse.pm,v 1.63 2003/01/07 22:13:07 albertel Exp $
+# $Id: radiobuttonresponse.pm,v 1.64 2003/04/02 15:09:00 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -370,7 +370,7 @@ sub displayfoils {
}
}
} else {
- my @alphabet = ('A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z');
+ my @alphabet = ('A'..'Z');
my $i = 0;
my $temp=0;
my $id=$Apache::inputtags::response['-1'];
@@ -379,12 +379,11 @@ sub displayfoils {
my %lastresponse=&Apache::lonnet::str2hash($lastresponse);
foreach my $name (@whichfoils) {
if ($target ne 'tex') {
- $result.="
\n";
- if ($Apache::lonhomework::type eq 'exam') {
- $result .= '
A: Correct | B: Incorrect |