Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision ca96627e

Von Bernd Bleßmann vor etwa 4 Jahren hinzugefügt

  • ID ca96627e718778587a5b1a4efb4d908699020b5f
  • Vorgänger 86dcebf0
  • Nachfolger 7de440bf

S:C:H:ThumbnailCreator: Thumbnail-Größe übergeben können

Unterschiede anzeigen:

SL/Controller/Helper/ThumbnailCreator.pm
);
sub file_create_thumbnail {
my ($thumb) = @_;
my ($thumb, %params) = @_;
croak "No picture set yet" if !$thumb->{content};
my $image = GD::Image->new($thumb->{content});
my ($width, $height) = $image->getBounds;
my $max_dim = 64;
my $max_dim = $params{size} // 64;
my $curr_max = max $width, $height, 1;
my $factor = $curr_max <= $max_dim ? 1 : $curr_max / $max_dim;
my $new_width = int($width / $factor + 0.5);
......
}
sub file_probe_type {
my ($content) = @_;
my ($content, %params) = @_;
return (t8("No file uploaded yet")) if !$content;
my $info = Image::Info::image_info(\$content);
if (!$info || $info->{error} || !$info->{file_media_type} || !$supported_mime_types{ $info->{file_media_type} }) {
......
$thumbnail->{file_image_height} = $info->{height};
$thumbnail->{content} = $content;
$thumbnail = &file_create_thumbnail($thumbnail);
$thumbnail = &file_create_thumbnail($thumbnail, %params);
return $thumbnail;
}

Auch abrufbar als: Unified diff