1. Shlomi Fish
  2. Qantor

Commits

Shlomi Fish  committed f01a222

Convert more.

  • Participants
  • Parent commits f3f7b71
  • Branches default

Comments (0)

Files changed (3)

File Text-Qantor/Build.PL

View file
     license             => 'mit',
     dist_author         => 'Shlomi Fish <shlomif@cpan.org>',
     dist_version_from   => 'lib/Text/Qantor.pm',
+    requires => {
+        'Carp' => 0,
+        'Exporter' => 0,
+        'File::Spec' => 0,
+        'Moose' => 0,
+        'XML::LibXML' => 0,
+        'XML::LibXSLT' => 0,
+        'XML::Writer' => 0,
+        'strict' => 0,
+        'vars' => 0,
+        'version' => 0,
+        'warnings' => 0,
+    },
     build_requires => {
         'Moose' => 0,
         # 'Regexp::Grammars' => 0,

File Text-Qantor/lib/Text/Qantor/Parser/Elem/Base.pm

View file
 
 =cut
 
-use base 'Class::Accessor';
+use Moose;
 
-__PACKAGE__->mk_accessors(qw(
-        body
-        name
-    ));
+has 'body' => (is => 'rw', isa => 'Str');
+has 'name' => (is => 'rw', isa => 'Str');
 
 sub new
 {
     my $class = shift;
     my $self = {};
     bless $self, $class;
-    
+
     $self->_init(@_);
 
     return $self;

File Text-Qantor/lib/Text/Qantor/Parser/Elem/ParaList.pm

View file
 
 =cut
 
-use base 'Text::Qantor::Parser::Elem::Base';
+use Moose;
 
-__PACKAGE__->mk_accessors(qw(_list));
+extends( 'Text::Qantor::Parser::Elem::Base' );
+
+has '_list' => (is => 'rw', isa => 'ArrayRef',);
 
 sub _init
 {