diff options
| author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-18 18:09:55 +0000 |
|---|---|---|
| committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-18 18:09:55 +0000 |
| commit | 4a1b3e8380838747531f6f9369755f752fa10480 (patch) | |
| tree | c2f9d5286781d34b9ab7c917623eec2af5ee55d6 /lib/sbin/ScheduleParser.pl | |
| parent | 00df9780973c7f98bf6655817d56320fca32e492 (diff) | |
A couple of bug-fixes to stop infinite loops.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@951 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/ScheduleParser.pl')
| -rw-r--r-- | lib/sbin/ScheduleParser.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/sbin/ScheduleParser.pl b/lib/sbin/ScheduleParser.pl index 69f8d204..665dd38b 100644 --- a/lib/sbin/ScheduleParser.pl +++ b/lib/sbin/ScheduleParser.pl @@ -265,9 +265,14 @@ sub ParseScheduleBlock while($fields[$field] !~ m:\s*\)\s*: && $field <= $#fields) { - next if($fields[$field] =~ m:\s*,\s*:); + if($fields[$field] =~ m:\s*,\s*:) + { + $field++; + next; + } push(@current_sched_list, $fields[$field]); + $field++; } $field++; |