--- loncom/homework/inputtags.pm	2013/08/29 13:02:11	1.322
+++ loncom/homework/inputtags.pm	2014/01/13 15:29:10	1.323
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.322 2013/08/29 13:02:11 raeburn Exp $
+# $Id: inputtags.pm,v 1.323 2014/01/13 15:29:10 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -254,7 +254,8 @@ sub start_textfield {
 		&& &Apache::londefdef::is_inside_of($tagstack,
 						    'essayresponse') ) {
 		$result='<table class="LC_pastsubmission"><tr><td>'.
-		    $oldresponse.'</td></tr></table>';
+		    &HTML::Entities::encode($oldresponse,'"<>&').
+                    '</td></tr></table>';
 	    }
 	    #get rid of any startup text
 	    &Apache::lonxml::get_all_text("/textfield",$parser,$style);