Changeset 50

Show
Ignore:
Timestamp:
03/24/07 15:49:00 (1 year ago)
Author:
simon
Message:

Change order so tags get read from RAW file on import.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/Memories/Photo.pm

    r49 r50  
    125125    my $jpg = tmpnam().".jpg"; 
    126126    system("dcraw -c $filename | convert - $jpg"); 
    127     my $photo = $self->upload_jpeg($r, $jpg, $offered_name); 
    128127    $filename =~ /\.(.*)$/; 
    129128    my $format = $1; 
     129    # Put the file in place 
    130130    $photo->format($format); 
    131     # Put the file in place 
    132131    copy($filename,  
    133132         Memories->config->{data_store}."/".$photo->id.".".$format); 
     133    my $photo = $self->upload_jpeg($r, $jpg, $offered_name); 
    134134    return $photo; 
    135135}