diff options
| author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-20 10:31:07 +0000 |
|---|---|---|
| committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-20 10:31:07 +0000 |
| commit | cd4c38a08a8dab6997f29dec74045b873761d699 (patch) | |
| tree | 19e9e19fe2187dc4a495b7dfe894b841d396ed33 /lib/sbin | |
| parent | 2594904c856fdbe82eccf81300512a344d6b6927 (diff) | |
Convert CCTK entry points to uppercase.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@974 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin')
| -rw-r--r-- | lib/sbin/ScheduleParser.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/sbin/ScheduleParser.pl b/lib/sbin/ScheduleParser.pl index 106111f4..f1db4aac 100644 --- a/lib/sbin/ScheduleParser.pl +++ b/lib/sbin/ScheduleParser.pl @@ -206,11 +206,11 @@ sub ParseScheduleBlock { if($fields[$field] =~ m:CCTK_:) { - $where = $fields[$field]; + $where = "\U$fields[$field]\E"; } else { - $where = "CCTK_$fields[$field]"; + $where = "CCTK_\U$fields[$field]\E"; } } $field+=2; |