--- trunk/lib/Frey/Web/CRUD.pm 2008/07/14 21:45:59 123
+++ trunk/lib/Frey/Web/CRUD.pm 2008/07/16 14:17:46 143
@@ -1,6 +1,7 @@
package Frey::Web::CRUD;
use Moose;
extends 'Frey::Web::Item';
+with 'Frey::Web::Button';
=head1 NAME
@@ -32,8 +33,9 @@
sub delete_button {
my $self = shift;
$self->add_button('Delete' => sub {
+ my $id = $self->fey->id;
$self->fey->delete;
- $self->next( qq|
Deleted id @{[$self->id]}!
|);
+ $self->next( qq|Deleted id $id
|);
$self->render_as( 'none' );
# Strix::Schema->ClearObjectCaches(); # XXX important!
});
@@ -52,8 +54,6 @@
warn "Inserted ",$u->id;
# XXX store object for later
$self->fey( $u );
- # put ID in widget, so that it know it's not new
- $self->id( $u->id );
$self->render_as( 'view' );
$self->edit_delete_buttons;
$self->remove_button( 'Add' );