From: Tim Pope Date: Thu, 11 Aug 2005 04:29:50 +0000 (+0000) Subject: Minor logic change X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=commitdiff_plain;h=0e0d6dcdea7eb31714375cbcc7de8ee68507cd47 Minor logic change --- diff --git a/perl/sctweb b/perl/sctweb index 6c47ff9..a60f0a2 100755 --- a/perl/sctweb +++ b/perl/sctweb @@ -642,9 +642,7 @@ sub do_transcripts { } } -if ($arg eq "-g") { - do_html_grades(@ARGV); -} elsif ($arg eq "-s") { +if ($arg eq "-s") { do_html_schedule(@ARGV); } elsif ($arg eq "-m") { do_mhc_schedule(@ARGV); @@ -652,6 +650,8 @@ if ($arg eq "-g") { do_csv_schedule(@ARGV); } elsif ($arg eq "-v") { do_vcalendar_schedule(@ARGV); +} elsif ($arg eq "-g") { + do_html_grades(@ARGV); } elsif ($arg eq "-t") { do_transcripts; } elsif ($arg eq "-f") {