--- loncom/interface/lonhtmlcommon.pm 2006/05/01 19:28:21 1.127
+++ loncom/interface/lonhtmlcommon.pm 2006/05/12 16:45:41 1.128
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.127 2006/05/01 19:28:21 albertel Exp $
+# $Id: lonhtmlcommon.pm,v 1.128 2006/05/12 16:45:41 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -178,6 +178,7 @@ sub get_recent {
sub textbox {
my ($name,$value,$size,$special) = @_;
$size = 40 if (! defined($size));
+ $value = &HTML::Entities::encode($value,'<>&"');
my $Str = '';
return $Str;