X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?p=xscreensaver;a=blobdiff_plain;f=OSX%2Fupdate-thumbnail.pl;h=da95f4aea3f1b2398461240cbc4f09d25400cd0f;hp=1f5eccee7c3c56f75d0ca49a97a0f6d697bbf3c7;hb=d5186197bc394e10a4402f7f6d23fbb14103bc50;hpb=6afd6db0ae9396cd7ff897ade597cd5483f49b0e diff --git a/OSX/update-thumbnail.pl b/OSX/update-thumbnail.pl index 1f5eccee..da95f4ae 100755 --- a/OSX/update-thumbnail.pl +++ b/OSX/update-thumbnail.pl @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# Copyright © 2006-2013 Jamie Zawinski +# Copyright © 2006-2014 Jamie Zawinski # # Permission to use, copy, modify, distribute, and sell this software and its # documentation for any purpose is hereby granted without fee, provided that @@ -18,7 +18,7 @@ require 5; use strict; my $progname = $0; $progname =~ s@.*/@@g; -my $version = q{ $Revision: 1.3 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/; +my ($version) = ('$Revision: 1.4 $' =~ m/\s(\d[.\d]+)\s/s); my $verbose = 1; @@ -92,6 +92,7 @@ sub update($$) { rand(0xFFFFFFFF)); my @cmd = ("convert", $img, + "-strip", "-resize", $size . "^", "-gravity", "center", "-extent", $size,