diff options
Diffstat (limited to 'modules/xml.pl')
| -rw-r--r-- | modules/xml.pl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/modules/xml.pl b/modules/xml.pl index 551dc3f..a3c6e85 100644 --- a/modules/xml.pl +++ b/modules/xml.pl @@ -20,6 +20,7 @@ sub readXML { $::dnsbl = $::xs1->XMLin( "$p/dnsbl.xml", ForceArray => []); $::rules = $::xs1->XMLin( "$p/rules.xml", ForceArray => []); $::restrictions = $::xs1->XMLin( "$p/restrictions.xml", ForceArray => ['host', 'nick', 'account']); + $::blacklist = $::xs1->XMLin( "$p/blacklist.xml", ForceArray => 'string'); } sub writeXML { @@ -27,6 +28,7 @@ sub writeXML { writeChannels(); writeUsers(); writeRestrictions(); + writeBlacklist(); # $::xs1->XMLout($::commands, RootName => 'commands', KeyAttr => ['id']) > io("$::cset/commands.xml"); } @@ -52,4 +54,9 @@ sub writeRestrictions { GroupTags => { hosts => "host", nicks => "nick", accounts => "account"}) > io("$::cset/restrictions.xml"); } +sub writeBlacklist { + $::settingschanged=1; + $::xs1->XMLout($::blacklist, RootName => 'blacklist', KeyAttr => ['id']) > io("$::cset/blacklist.xml"); +} + return 1; |