diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2007-07-03 23:26:43 +0000 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2007-07-03 23:26:43 +0000 |
| commit | 6fe4d3ecbdc3196c7c62b9b7e00d5063bd0dbee9 (patch) | |
| tree | 2804867a892bf9d6bb3c231b02938896accb5b91 /modules/xml.pl | |
| parent | f52c9bd6e6e018ff0c45f1dea4ded2aeb4ae1427 (diff) | |
code optimizations, rehash bugfix, lots of cleanup, new hilights, removed some old rules, added and improved some new rules
Diffstat (limited to 'modules/xml.pl')
| -rw-r--r-- | modules/xml.pl | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/modules/xml.pl b/modules/xml.pl index c497ffc..c3da924 100644 --- a/modules/xml.pl +++ b/modules/xml.pl @@ -11,12 +11,11 @@ sub readXML { my ( $p ) = $::cset; #@_; $p = 'default' if $p eq ''; $p = "config-$p"; - $::settings = $::xs1->XMLin( "$p/settings.xml", ForceArray => [qw/host/], - GroupTags => { altnicks => 'altnick', server => 'host', autojoins=> 'autojoin' }); - $::channels = $::xs1->XMLin( "$p/channels.xml", ForceArray => [qw/event debug info low medium high/] ); - $::users = $::xs1->XMLin( "$p/users.xml", ForceArray => 'person' ); + $::settings = $::xs1->XMLin( "$p/settings.xml", ForceArray => ['host'], 'GroupTags' => { altnicks => 'altnick', server => 'host', autojoins => 'autojoin' }); + $::channels = $::xs1->XMLin( "$p/channels.xml", ForceArray => [qw/event debug info low medium high/]); + $::users = $::xs1->XMLin( "$p/users.xml", ForceArray => 'person'); $::commands = $::xs1->XMLin( "$p/commands.xml", ForceArray => [qw/command/]); - $::mysql = $::xs1->XMLin( "$p/mysql.xml", ForceArray => [] ); + $::mysql = $::xs1->XMLin( "$p/mysql.xml", ForceArray => []); } sub writeXML { |