From eba37aa49fb0ac65a9b1077e97d875eddf298b85 Mon Sep 17 00:00:00 2001 From: Tim Pope Date: Tue, 16 Aug 2005 21:26:34 +0000 Subject: [PATCH] Removed debug statement --- perl/schedproc | 1 - 1 file changed, 1 deletion(-) diff --git a/perl/schedproc b/perl/schedproc index 3c34f3a..137d2ea 100755 --- a/perl/schedproc +++ b/perl/schedproc @@ -105,7 +105,6 @@ sub next_class { @off = @{$class{'off'}} if ($class{'off'}); for($today = ($today > $firstday ? $today : $firstday); $today < $lastday; $today++) { next unless(grep($_ == Day_of_Week($today->date), @days)); - print "$today\n"; next if(grep($_ == "$today", @off)); return $today; } -- 2.30.2