From b360342f3f9fcf38108b1907c00c098d25474cf1 Mon Sep 17 00:00:00 2001 From: Tim Pope Date: Mon, 23 Aug 2004 19:16:28 +0000 Subject: [PATCH] XHTML corrections --- perl/sctweb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/sctweb b/perl/sctweb index 714f336..df51173 100755 --- a/perl/sctweb +++ b/perl/sctweb @@ -190,7 +190,7 @@ sub do_html_schedule { sub do_html_grades { my @readheaders = ("Section ID", "Course Title", "Grade", "Earned Hours", "Quality Hours", "Quality Points", "GPA"); - my @showheaders = ("Section ID", "Course Title", "Grade", "Earned
Hours", "Quality
Hours", "Quality
Points", "GPA"); + my @showheaders = ("Section ID", "Course Title", "Grade", "Earned
Hours", "Quality
Hours", "Quality
Points", "GPA"); my ($row, $lastrow); my $te = new HTML::TableExtract( headers => [ @readheaders ] ); my $response = $ua->get("$url&tserve_tip_write=||WID|SID|PIN|Term&tserve_trans_config=rgrdterm.cfg"); # Valid grading terms -- 2.30.2