[Jifty-commit] r6140 - in Net-Jifty/branches/classbuilder: . lib/Net/Jifty/Meta

[Jifty commits]

Author: sartak
Date: Wed Dec 17 00:07:59 2008
New Revision: 6140

Modified:
   Net-Jifty/branches/classbuilder/   (props changed)
   Net-Jifty/branches/classbuilder/lib/Net/Jifty/Meta/Class.pm
   Net-Jifty/branches/classbuilder/lib/Net/Jifty/Record.pm

Log:
 r77639 at onn:  sartak | 2008-12-17 00:07:55 -0500
 auto_update is now a metaclass attribute; rename update to send_changes


Modified: Net-Jifty/branches/classbuilder/lib/Net/Jifty/Meta/Class.pm
==============================================================================
--- Net-Jifty/branches/classbuilder/lib/Net/Jifty/Meta/Class.pm	(original)
+++ Net-Jifty/branches/classbuilder/lib/Net/Jifty/Meta/Class.pm	Wed Dec 17 00:07:59 2008
@@ -12,6 +12,12 @@
     isa => 'Net::Jifty',
 );
 
+has auto_update => (
+    is      => 'rw',
+    isa     => 'Bool',
+    default => 1,
+);
+
 __PACKAGE__->meta->make_immutable;
 no Moose;
 

Modified: Net-Jifty/branches/classbuilder/lib/Net/Jifty/Record.pm
==============================================================================
--- Net-Jifty/branches/classbuilder/lib/Net/Jifty/Record.pm	(original)
+++ Net-Jifty/branches/classbuilder/lib/Net/Jifty/Record.pm	Wed Dec 17 00:07:59 2008
@@ -3,12 +3,6 @@
 use Moose;
 use MooseX::AttributeHelpers;
 
-has auto_update => (
-    is      => 'rw',
-    isa     => 'Bool',
-    default => 1,
-);
-
 has id => (
     is       => 'ro',
     isa      => 'Int',
@@ -27,7 +21,7 @@
     },
 );
 
-sub update {
+sub send_changes {
     my $self = shift;
     return unless $self->has_changes;
     my @changes = $self->clear_changes;
@@ -47,7 +41,7 @@
 
 sub DEMOLISH {
     my $self = shift;
-    $self->update if $self->has_changes;
+    $self->send_changes if $self->has_changes;
 }
 
 __PACKAGE__->meta->make_immutable;