From f52c9bd6e6e018ff0c45f1dea4ded2aeb4ae1427 Mon Sep 17 00:00:00 2001
From: William Heimbigner <william.heimbigner@gmail.com>
Date: Fri, 29 Jun 2007 02:21:38 +0000
Subject: lots of modularization done, needs testing and is unstable

---
 modules/xml.pl | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'modules/xml.pl')

diff --git a/modules/xml.pl b/modules/xml.pl
index 4a4d702..c497ffc 100644
--- a/modules/xml.pl
+++ b/modules/xml.pl
@@ -1,7 +1,9 @@
+package ASM::XML;
 use warnings;
 use strict;
 
 use XML::Simple qw(:strict);
+use IO::All;
 
 $::xs1 = XML::Simple->new( KeyAttr => ['id'], Cache => [ qw/storable memcopy/ ]);
 
@@ -52,9 +54,4 @@ sub writeSettings {
   $::xs1->XMLout($::settings, RootName => 'settings', GroupTags => { altnicks => 'altnick', server => 'host', autojoins => 'autojoin' }, NoAttr => 1) > io("$p/settings.xml");
 }
 
-sub Xml::killsub {
-  undef &readXML;
-  undef &writeXML;
-}
-
 return 1;
-- 
cgit v1.2.3