--- loncom/homework/radiobuttonresponse.pm	2001/01/19 21:44:12	1.10
+++ loncom/homework/radiobuttonresponse.pm	2001/02/05 18:19:28	1.11
@@ -124,8 +124,13 @@ sub displayfoils {
   &Apache::lonxml::debug("the true statement is $answer");
   if ($Apache::lonhomework::history{"resource.$Apache::inputtags::part.solved"} =~ /^correct/ ) {
     foreach $name (@whichfalse) {
-      $result.="<br />".$Apache::response::foilgroup{$name.'.value'}.
-	":".$Apache::response::foilgroup{$name.'.text'}."</input>\n";
+      $result.="<br />";
+      if ($Apache::response::foilgroup{$name.'.value'} eq 'true') { 
+	$result.='Correct';
+      } else {
+	$result.='Incorrect';
+      }
+      $result.=":".$Apache::response::foilgroup{$name.'.text'}."</input>\n";
     }
   } else {
     my $temp=0;