[Bps-public-commit] r16731 - in sd/branches/init-and-clone: lib/App/SD/Replica

sartak at bestpractical.com sartak at bestpractical.com
Thu Nov 6 15:20:08 EST 2008


Author: sartak
Date: Thu Nov  6 15:20:08 2008
New Revision: 16731

Modified:
   sd/branches/init-and-clone/   (props changed)
   sd/branches/init-and-clone/lib/App/SD/Replica/rt.pm

Log:
 r75154 at onn:  sartak | 2008-11-06 15:20:02 -0500
 BUILD replaces setup/initialize type methods


Modified: sd/branches/init-and-clone/lib/App/SD/Replica/rt.pm
==============================================================================
--- sd/branches/init-and-clone/lib/App/SD/Replica/rt.pm	(original)
+++ sd/branches/init-and-clone/lib/App/SD/Replica/rt.pm	Thu Nov  6 15:20:08 2008
@@ -16,16 +16,7 @@
 has rt_queue => ( isa => 'Str', is => 'rw');
 has rt_query => ( isa => 'Str', is => 'rw');
 
-# XXX: this should be called from superclass, or better, have individual attributes have their own builders.
-
-around 'new' => sub {
-    my ($next, $self, @args) = @_;
-    my $ret = $self->$next(@args);
-    $ret->setup;
-    return $ret;
-};
-
-sub setup {
+sub BUILD {
     my $self = shift;
 
     # Require rather than use to defer load



More information about the Bps-public-commit mailing list