--- loncom/interface/lonindexer.pm 2002/05/09 23:01:41 1.41
+++ loncom/interface/lonindexer.pm 2002/05/31 21:50:30 1.42
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Directory Indexer
#
-# $Id: lonindexer.pm,v 1.41 2002/05/09 23:01:41 www Exp $
+# $Id: lonindexer.pm,v 1.42 2002/05/31 21:50:30 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -743,8 +743,8 @@ sub display_line {
$title = &Apache::lonnet::metadata($filelink,'title')
if ($metafile == 1);
$title=$listname unless $title;
- my $titleesc=$title;
- $titleesc=~s/\'/\\'/; #' (clean up this spare quote
+ my $titleesc=HTML::Entities::encode($title);
+ $titleesc=~s/\'/\\'/; #' (clean up this spare quote)
$r->print("");
$r->print("".
@@ -756,6 +756,7 @@ sub display_line {
$title = &Apache::lonnet::metadata($filelink,'title')
if ($metafile == 1);
$title=$listname unless $title;
+ my $titleesc=&HTML::Entities::encode($title);
$r->print("