[LON-CAPA-cvs] cvs: loncom /homework optionresponse.pm

[albertel]

albertel		Tue Nov  4 13:37:40 2003 EDT

  Modified files:              
    /loncom/homework	optionresponse.pm 
  Log:
  - BUG#1458
  
  
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.94 loncom/homework/optionresponse.pm:1.95
--- loncom/homework/optionresponse.pm:1.94	Mon Oct 27 15:04:34 2003
+++ loncom/homework/optionresponse.pm	Tue Nov  4 13:37:40 2003
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.94 2003/10/27 20:04:34 albertel Exp $
+# $Id: optionresponse.pm,v 1.95 2003/11/04 18:37:40 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -318,6 +318,8 @@
 		} else {
 		    $text=$value.': '.$text;
 		}
+	    } else {
+		$text='•'.$text;
 	    }
 	    $result.=$text."\n";
       } elsif ($target eq 'tex') {
@@ -367,6 +369,8 @@
 	  my $text=$Apache::response::foilgroup{$name.'.text'};
 	  if (!($text=~s|<drawoptionlist\s*/>|$optionlist|) && $Apache::lonhomework::type ne 'exam') {
 	      $text=$optionlist.$text;
+	  } else {
+	      $text='&#149;'.$text;
 	  }
 	  $result.=$break.$text."\n";
 	  if ($Apache::lonhomework::type eq 'exam') {