[LON-CAPA-cvs] cvs: loncom /interface/spreadsheet studentcalc.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 05 Aug 2005 20:06:25 -0000
albertel Fri Aug 5 16:06:25 2005 EDT
Modified files:
/loncom/interface/spreadsheet studentcalc.pm
Log:
- BUG# 4248, SUMSEQ wsn't fetching titles correctly
Index: loncom/interface/spreadsheet/studentcalc.pm
diff -u loncom/interface/spreadsheet/studentcalc.pm:1.33 loncom/interface/spreadsheet/studentcalc.pm:1.34
--- loncom/interface/spreadsheet/studentcalc.pm:1.33 Tue May 17 13:48:19 2005
+++ loncom/interface/spreadsheet/studentcalc.pm Fri Aug 5 16:06:22 2005
@@ -1,5 +1,5 @@
#
-# $Id: studentcalc.pm,v 1.33 2005/05/17 17:48:19 albertel Exp $
+# $Id: studentcalc.pm,v 1.34 2005/08/05 20:06:22 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -458,7 +458,7 @@
# 1. duplicate titles - they get the total for the titles
# 2. control characters in titles - use q{} around the string to
# deal with it.
- my $title = &HTML::Entities::decode($seq->{'title'});
+ my $title = &HTML::Entities::decode($seq->title());
$title =~ s/&\#058;/:/g;
if (@Rows) {
$data .= 'push(@{$Sequence_Rows{"'.quotemeta($title).'"}},'.