Changeset 4585


Ignore:
Timestamp:
12/30/09 22:31:40 (10 years ago)
Author:
ronosman
Message:

Bug fixed : wrong file name when uploading HD copy of original

File:
1 edited

Legend:

Unmodified
Added
Removed
  • extensions/pLoader/trunk/src/Uploader/ImageList.pm

    r4568 r4585  
    220220    # if some files have been previously selected  
    221221    my $i = scalar @{$self->sums}; 
    222 printf("SetNewFiles %s\n", $i); 
     222    #printf("SetNewFiles %s\n", $i); 
    223223    my $count = 0; 
    224224    $self->count($count); 
     
    329329    my ( $self, $file, $info, $i ) = @_; 
    330330     
    331 printf("_default_photo_name %s\n", $self->default_photo_name); 
    332331     
    333332    my $name; 
     
    381380    } 
    382381 
    383 printf("_default_photo_name %s\n", $name); 
    384382    $name; 
    385383} 
     
    566564        $resize_h = $resize_w_; 
    567565    } 
    568     printf("resize with blur value %s\n", $self->blur); 
     566    #printf("resize with blur value %s\n", $self->blur); 
    569567    $status = $image->Resize( 
    570568        geometry => sprintf("%sx%s>", $resize_w, $resize_h),  
     
    591589    } 
    592590 
    593     printf("resize with quality value %s\n", $self->quality); 
     591    #printf("resize with quality value %s\n", $self->quality); 
    594592    $status = $image->Set(quality=>$self->quality); 
    595593    warn "$status" if $status ; 
     
    809807        $self-> _set_site_high_file (); 
    810808        # photo metadata 
     809        $self->_upload_selection_prepare() if (!$uploaded->{$self->current_image->file_sum} or $self->reupload_action_files); 
    811810        $self->_prepare_upload_properties();             
    812         $self->_upload_selection_prepare() if (!$uploaded->{$self->current_image->file_sum} or $self->reupload_action_files); 
    813811 
    814812        # transfert resized, high, thumbnail to site 
     
    836834    $self->_set_upload_msg(gettext("Preparing resized image for")); 
    837835    $self->_upload_progress(); 
    838  
     836    #printf("resized %s\n", $self->create_resized); 
    839837    if( $self->create_resized ){ 
    840838        $self->_create_site_resized_file(); 
     
    844842    # the original is at the right size, no need to create a resize 
    845843    else { 
     844        #printf("original no resized %s\n", $self->create_resized); 
    846845        $self->current_image->site_resized_file( 
    847846            $self->current_image->file, 
     
    854853            'Yes, use a copy of the original photo' => 'ORIGINAL', 
    855854    };   
    856 printf("upload HD %s\n", $self->upload_hd); 
     855    #printf("upload HD %s\n", $self->upload_hd); 
    857856        $self->upload_high( 
    858857            $decode->{$self->upload_hd} 
    859858        ); 
     859    #printf("upload High %s\n", $self->upload_high); 
    860860         
    861861    # if upload high, rotate a copy of original file 
     
    10271027        ) 
    10281028    ); 
     1029    #printf("_set_site_resized_file %s\n", $self->current_image->site_resized_file); 
    10291030} 
    10301031 
     
    10581059    my ( $self ) = @_; 
    10591060    # use wx builtin rescale if IM fails 
    1060     printf("CreateResized failed %s. Use ResizeCallback\n", $@); 
     1061    #printf("CreateResized failed %s. Use ResizeCallback\n", $@); 
    10611062    # use method provided by the caller 
    10621063    # source, target, type, ratio, width, $height 
     
    10801081    my ( $self ) = @_; 
    10811082 
    1082 printf("CreateHigh %s\n", $self->upload_high); 
     1083    #printf("CreateHigh %s\n", $self->upload_high); 
    10831084    my $bModifyOriginal; 
    10841085    my $bRotate; 
     
    11251126        } 
    11261127         
    1127         printf("resize with quality value %s\n", $self->quality); 
     1128        #printf("resize with quality value %s\n", $self->quality); 
    11281129        $status = $image->Set(quality=>$self->quality); 
    11291130        warn "$status" if $status ; 
     
    11731174            $self->current_image->file 
    11741175        ); 
     1176        #printf("site high file %s\n", $self->current_image->site_high_file); 
    11751177    } 
    11761178 
     
    12091211 
    12101212    # debug 
    1211     printf("Create watermark %s\n", $file_out); 
     1213    #printf("Create watermark %s\n", $file_out); 
    12121214 
    12131215     
Note: See TracChangeset for help on using the changeset viewer.