diff Lib/IMPL/Serialization/XmlFormatter.pm @ 166:4267a2ac3d46

Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents dc1da0389db7
children 4ddb27ff4a0b
line wrap: on
line diff
--- a/Lib/IMPL/Serialization/XmlFormatter.pm	Sat Apr 23 23:06:48 2011 +0400
+++ b/Lib/IMPL/Serialization/XmlFormatter.pm	Sat Apr 23 23:12:06 2011 +0400
@@ -1,7 +1,7 @@
 package IMPL::Serialization::XmlObjectWriter;
 use strict;
 
-use base qw(IMPL::Object);
+use parent qw(IMPL::Object);
 use IMPL::Class::Property;
 use IMPL::Class::Property::Direct;
 
@@ -125,7 +125,7 @@
 }
 
 package IMPL::Serialization::XmlObjectReader;
-use base qw(XML::Parser);
+use parent qw(XML::Parser);
 
 sub new {
   my $class = shift;
@@ -168,7 +168,7 @@
 }
 
 package IMPL::Serialization::XmlFormatter;
-use base qw(IMPL::Object);
+use parent qw(IMPL::Object);
 
 use IMPL::Class::Property;
 use IMPL::Class::Property::Direct;