--- loncom/homework/optionresponse.pm	2007/10/15 09:47:29	1.147
+++ loncom/homework/optionresponse.pm	2008/06/23 11:27:44	1.150
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.147 2007/10/15 09:47:29 foxr Exp $
+# $Id: optionresponse.pm,v 1.150 2008/06/23 11:27:44 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -70,8 +70,9 @@ sub start_optionresponse {
     $result=&Apache::response::meta_package_write('optionresponse');
   } elsif ($target eq 'analyze') {
     my $part_id="$Apache::inputtags::part.$id";
+    $Apache::lonhomework::analyze{"$part_id.type"} = 'optionresponse';
     push (@{ $Apache::lonhomework::analyze{"parts"} },$part_id);
-    push (@{ $Apache::lonhomeowrk::analyze{"$part_id.bubble_lines"} }, 1);
+    push (@{ $Apache::lonhomework::analyze{"$part_id.bubble_lines"} }, 1);
 
   }
   return $result;
@@ -502,7 +503,7 @@ sub displayfoils {
 
 sub optionlist_correction {
     my ($TeXlayout,@options) = @_;
-    my $texoptionlist='\\item [] Choices: ';
+    my $texoptionlist='\\item [] '.&mt('Choices:').' ';
     if ($TeXlayout eq 'vertical') {$texoptionlist='\\item []';}
     if (scalar(@options) > 0) {
 	foreach my $option (@options) {