Changeset 59

Show
Ignore:
Timestamp:
04/10/07 00:59:43 (1 year ago)
Author:
simon
Message:

I can't believe we didn't have a delete method.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/Memories/Photo.pm

    r57 r59  
    212212sub similar :Exported {} 
    213213sub sized :Exported {} 
     214sub delete :Exported { 
     215    my ($self, $r, $photo) = @_; 
     216    if ($photo and $photo->uploader == $r->user) { 
     217        $photo->delete; 
     218        $r->message("Photo deleted!"); 
     219    } 
     220    $r->template("frontpage"); 
     221} 
    214222 
    215223use Class::DBI::Plugin::Pager;