Changeset 3142


Ignore:
Timestamp:
Feb 13, 2009, 3:07:48 PM (15 years ago)
Author:
ronosman
Message:

Add interlaced jpeg.

File:
1 edited

Legend:

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

    r2730 r3142  
    397397
    398398    my $status = $image->Read(
    399         $self->current_image->file
     399        sprintf(
     400            "'%s'",
     401            $self->current_image->file,
     402        )
    400403    );
    401404    warn "$status ", $self->current_image->file, "\n" if $status ;
     
    444447    my $rval = 1 ;
    445448    return $rval if( -e $self->current_image->site_resized_file );
    446    
     449
     450printf(
     451    "Create resized %s\n",
     452    $self->current_image->file,
     453);     
    447454
    448455    my $image = new Image::Magick;
     
    492499
    493500    $status = $image->Set(quality=>$self->quality);
     501    warn "$status" if $status ;
     502
     503    $status = $image->Set(interlace=>'Line');
    494504    warn "$status" if $status ;
    495505
Note: See TracChangeset for help on using the changeset viewer.