diff options
author | eschnett <eschnett@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2012-05-02 23:16:11 +0000 |
---|---|---|
committer | eschnett <eschnett@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2012-05-02 23:16:11 +0000 |
commit | acc1530ee84bab1e0288e64fba8a581002bdae16 (patch) | |
tree | cf0a3285d0782992a751526d070e17c6c3a506bf /lib | |
parent | b7e100f8ac916f47f4a6b01002bd5157a2eccdf0 (diff) |
Handle BEGIN/END INCLUDE in configuration.ccl script output
Translate BEGIN INCLUDE...END INCLUDE into include statements.
git-svn-id: http://svn.cactuscode.org/flesh/trunk@4809 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib')
-rw-r--r-- | lib/sbin/ConfigScriptParser.pl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/sbin/ConfigScriptParser.pl b/lib/sbin/ConfigScriptParser.pl index 1b88a5e8..25e7d36b 100644 --- a/lib/sbin/ConfigScriptParser.pl +++ b/lib/sbin/ConfigScriptParser.pl @@ -57,6 +57,20 @@ sub ParseConfigScript } } + elsif($line =~ m/^\s*BEGIN\s+INCLUDE\s*/i) + { + $line_number++; + $line = $data[$line_number]; + chomp $line; + while($line !~ m/^\s*END\s+INCLUDE\s*/i) + { + $cfg->{"\U$thorn $provides\E INCLUDE"} .= $line . "\n"; + $line_number++; + $line = $data[$line_number]; + chomp $line; + + } + } elsif($line =~ m/^\s*BEGIN\s+ERROR\s*/i) { $line_number++; |