Ignore:
Timestamp:
May 7, 2010, 6:37:05 PM (14 years ago)
Author:
ronosman
Message:

Feature 1650 added : ability to create square thumbnails.

File:
1 edited

Legend:

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

    r6088 r6094  
    132132                image_selection_author
    133133                image_selection_create_date
     134                thumbnail_shape_square
    134135     /
    135136);
     
    665666    warn "$status" if $status ;
    666667
    667    
     668    my $pattern = $self->thumbnail_shape_square ?
     669        "%sx%s^" :
     670        "%sx%s>" ;
    668671    $status = $image->Resize(
    669672        geometry => sprintf(
    670                                 "%sx%s>",
     673                                $pattern,
    671674                                $self->thumb_size,
    672675                                $self->thumb_size
     
    677680    $status = $image->Set(Gravity=>"Center");
    678681    warn "$status" if $status ;
     682
     683    $status = $image->Crop(
     684        geometry=>sprintf("%sx%s+0+0", $self->thumb_size, $self->thumb_size)
     685    ) if $self->thumbnail_shape_square;
     686
    679687
    680688    $status = $image->Set(quality=>$self->th_quality);
     
    790798                display_mode
    791799                image_selection_tags
     800                thumbnail_shape_square
    792801            /
    793802        ]
Note: See TracChangeset for help on using the changeset viewer.