Changeset 34

Show
Ignore:
Timestamp:
02/16/07 22:39:25 (2 years ago)
Author:
simon
Message:

A bit of defense.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/Memories/Photo.pm

    r33 r34  
    6969        rated => 0, 
    7070    }); 
    71     copy($filename, $photo->path("file")); 
     71    if (!copy($filename, $photo->path("file"))) { 
     72        $photo->delete(); die "Couldn't copy photo: $!"; 
     73    } 
    7274    my ($x, $y) = dim(image_info($photo->path)); 
    7375    $photo->x($x); $photo->y($y);