X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=blobdiff_plain;f=perl%2Fschedproc;h=b1f9d173d223be5adfe044cadaa8777a6d8983f0;hp=eaaa024664b168e2619163128ed1dd4b76b41dcc;hb=d0e0875970a27f0a7926b249ddfca9e61de4e18a;hpb=3caeb0117b4cdaa4cecc82f8ecf86e588b4720d5
diff --git a/perl/schedproc b/perl/schedproc
index eaaa024..b1f9d17 100755
--- a/perl/schedproc
+++ b/perl/schedproc
@@ -140,7 +140,7 @@ sub get_grades {
}
sub do_html_grades {
- my $grades);
+ my $grades;
my @showheaders = ("Section ID", "Course Title", "Grade", "Earned
Hours", "Quality
Hours", "Quality
Points");
#$file = shift unless (!defined $_[0] or $_[0] =~ /^\d/);
$grades = get_grades(@_);