Merge branch 'master' into new_rendering

zby · Aug 28, 2010 · 37ec415 · 37ec415
2 parents 9a01c72 + 48b626f
commit 37ec415
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 6 deletions.
diff --git a/examples/DvdDatabase/lib/DvdDatabase/Controller/Dvd/Record.pm b/examples/DvdDatabase/lib/DvdDatabase/Controller/Dvd/Record.pm
@@ -5,7 +5,7 @@ package DvdDatabase::Controller::Dvd::Record;
 
 use base 'WebNano::Controller';
 
-use Class::XSAccessor { accessors => [ qw/ record / ], };
+use Object::Tiny::RW  'record';
 
 
 sub index_action {

diff --git a/extensions/WebNano-Renderer-TT/lib/WebNano/Renderer/TT.pm b/extensions/WebNano-Renderer-TT/lib/WebNano/Renderer/TT.pm
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 use Template;
-use Class::XSAccessor { accessors => [ qw/ root _tt global_path INCLUDE_PATH / ], };
+use Object::Tiny::RW qw/ root _tt global_path INCLUDE_PATH /;
 use File::Spec;
 
 sub new {

diff --git a/lib/WebNano/Controller.pm b/lib/WebNano/Controller.pm
@@ -9,10 +9,7 @@ use URI::Escape 'uri_unescape';
 use Plack::Request;
 use File::Spec::Functions qw/catfile catdir/;
 
-use Class::XSAccessor { 
-    accessors => [ qw/ application env self_path self_url url_map _request / ], 
-    constructor => 'new' 
-};
+use Object::Tiny::RW  qw/ application env self_path self_url url_map _request /;
 
 sub request { 
     my $self = shift;