png-verify.pl: allow 72dpcm for pve installer images

This commit is contained in:
Dietmar Maurer 2017-12-22 11:36:31 +01:00
parent df6857bc2c
commit 3bf6c8e654

View File

@ -2,15 +2,27 @@
use strict;
use warnings;
use File::Basename;
my $installer_images = {
'pve-grub-menu.png' => 1,
'pve-installation.png' => 1,
'pve-select-location.png' => 1,
'pve-select-target-disk.png' => 1,
'pve-set-password.png' => 1,
'pve-setup-network.png' => 1,
};
my $infile = shift ||
die "no input file specified\n";
my $dpcm = 58; # expected
my $basename = basename($infile);
my $dpcm = $installer_images->{$basename} ? 72 : 58; # expected
my $tmp = `identify -units PixelsPerCentimeter -format '%x x %y' $infile`;
die "got unexpected density '$tmp' (fix with png-cleanup.pl)\n"
die "$infile: got unexpected density '$tmp' (fix with png-cleanup.pl)\n"
if $tmp ne "$dpcm x $dpcm";
exit 0;