From aeb52de85a365d28a2b85ef54696a7477a0b470b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 31 Mar 2012 22:40:28 +0000 Subject: dosepsbin (23mar12) git-svn-id: svn://tug.org/texlive/trunk@25808 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/scripts/dosepsbin/dosepsbin.pl | 20 ++++++++++++++------ 1 file changed, 14 insertions(+), 6 deletions(-) (limited to 'Master/texmf-dist/scripts') diff --git a/Master/texmf-dist/scripts/dosepsbin/dosepsbin.pl b/Master/texmf-dist/scripts/dosepsbin/dosepsbin.pl index 5f7fedbb575..41b72991fc3 100755 --- a/Master/texmf-dist/scripts/dosepsbin/dosepsbin.pl +++ b/Master/texmf-dist/scripts/dosepsbin/dosepsbin.pl @@ -4,10 +4,10 @@ use strict; $^W=1; my $prj = 'dosepsbin'; -my $version = '1.1'; -my $date = '2011/12/05'; +my $version = '1.2'; +my $date = '2012/03/22'; my $author = 'Heiko Oberdiek'; -my $copyright = "Copyright 2011 $author"; +my $copyright = "Copyright 2011-2012 $author"; my $verbose = 0; my $quiet = 0; @@ -196,7 +196,7 @@ verbose_kv 'length of TIFF section', $length_tiff; print "--> $type section is not available.\n" unless $quiet; return ''; } - $$ref_off >= 32 and $$ref_off < $inputfile_size or + $$ref_off >= 30 and $$ref_off < $inputfile_size or die_error "Invalid offset of PS section", { '1 input file' => $inputfile, "2 offset of $type section" => $$ref_off, @@ -298,7 +298,7 @@ dosepsbin -- Extract PS/WMF/TIFF sections from DOS EPS binary files =head1 VERSION -2011-12-05 v1.1 +2012-03-22 v1.2 =head1 SYNOPSIS @@ -407,7 +407,7 @@ Heiko Oberdiek, email: heiko.oberdiek at googlemail.com =head1 COPYRIGHT AND LICENSE -Copyright 2011 by Heiko Oberdiek. +Copyright 2011-2012 by Heiko Oberdiek. This library is free software; you may redistribute it and/or modify it under the same terms as Perl itself @@ -444,6 +444,14 @@ in section "5.2 Windows Metafile or TIFF": =back +=item B<2012/03/22 v1.2> + +=over 2 + +=item * Fix in validation test for offset of PS section. + +=back + =back =cut -- cgit v1.2.3