thumbpdf 3.9

git-svn-id: svn://tug.org/texlive/trunk@5466 c570f23f-e606-0410-a88d-b1316a301751

4 files changed, 20 insertions, 14 deletions

diff --git a/Master/texmf-dist/doc/generic/thumbpdf/readme.txt b/Master/texmf-dist/doc/generic/thumbpdf/readme.txt
index 9c94fb2b1b8..a1a0417a4e4 100644
--- a/Master/texmf-dist/doc/generic/thumbpdf/readme.txt
+++ b/Master/texmf-dist/doc/generic/thumbpdf/readme.txt
@@ -1,4 +1,4 @@
-readme.txt for project thumbpdf 2005/07/06 v3.8
+readme.txt for project thumbpdf 2007/11/07 v3.9
 
 TABLE OF CONTENTS
 =================
@@ -50,7 +50,7 @@ In the following the user TeX file is called `<jobname>.tex'.
 
 B. COPYRIGHT, DISCLAIMER, LICENSE
 =================================
-Copyright (C) 1999-2005 Heiko Oberdiek.
+Copyright (C) 1999-2005, 2007 Heiko Oberdiek.
 
 This work may be distributed and/or modified under the
 conditions of the LaTeX Project Public License, either version 1.3
@@ -587,3 +587,5 @@ J. HISTORY
     by pdfTeX 1.20a.
 2005/07/06 v3.8
   * Fix because of pdfTeX 1.30.
+2007/11/07 v3.9
+  * Deprecation warning of perl 5.8.8 fixed.
diff --git a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty
index 74569d864dc..60079fe29cd 100644
--- a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty
+++ b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.sty
@@ -1,11 +1,11 @@
 % File:        thumbpdf.sty
 % Project:     thumbpdf
-% Version:     2005/07/06 v3.8
+% Version:     2007/11/07 v3.9
 % Author:      Heiko Oberdiek
 %
 % Function:    Inclusion of thumbnails
 %
-% Copyright:   Copyright (C) 1999-2005 Heiko Oberdiek.
+% Copyright:   Copyright (C) 1999-2005, 2007 Heiko Oberdiek.
 %
 %              This work may be distributed and/or modified under
 %              the conditions of the LaTeX Project Public License,
@@ -93,6 +93,7 @@
 %              2004/11/19 v3.6
 %              2004/11/19 v3.7
 %              2005/07/06 v3.8
+%              2007/11/07 v3.9
 %
 % \THB@ is the prefix for internal command names.
 %
@@ -113,7 +114,7 @@
       \def\x{\endgroup\ProvidesPackage{thumbpdf}}%
     \fi
   \fi
-\x[2005/07/06 v3.8 Inclusion of thumbnails (HO)]%
+\x[2007/11/07 v3.9 Inclusion of thumbnails (HO)]%
 
 % Dummy for \thisthumb and \DeclareThumbs. It is overwritten,
 % if the checks succeed and the whole package is loaded.
diff --git a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex
index 0bfdf2b8eda..0b80d0e119e 100644
--- a/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex
+++ b/Master/texmf-dist/tex/generic/thumbpdf/thumbpdf.tex
@@ -1,9 +1,9 @@
 % File:        thumbpdf.tex
 % Project:     thumbpdf
-% Version:     2005/07/06 v3.8
+% Version:     2007/11/07 v3.9
 % Author:      Heiko Oberdiek
 %
-% Copyright:   Copyright (C) 1999-2005 Heiko Oberdiek.
+% Copyright:   Copyright (C) 1999-2005, 2007 Heiko Oberdiek.
 %
 %              This work may be distributed and/or modified under
 %              the conditions of the LaTeX Project Public License,
@@ -86,9 +86,10 @@
 %                thumbpdf objects are now valid PDF objects that
 %                are referenced in the Catalog.
 %              2005/07/06 v3.8
+%              2007/11/07 v3.9
 
 \immediate\write16{%
-  File: thumbpdf.tex 2005/07/06 v3.8 %
+  File: thumbpdf.tex 2007/11/07 v3.9 %
   Including thumbnails as images (HO)%
 }
 \immediate\write16{%
diff --git a/Master/texmf/scripts/thumbpdf/thumbpdf.pl b/Master/texmf/scripts/thumbpdf/thumbpdf.pl
index 832e4e76717..b18a89cf88e 100644
--- a/Master/texmf/scripts/thumbpdf/thumbpdf.pl
+++ b/Master/texmf/scripts/thumbpdf/thumbpdf.pl
@@ -5,7 +5,7 @@ $^W=1; # turn warning on
 #
 # thumbpdf.pl
 #
-# Copyright (C) 1999-2005 Heiko Oberdiek.
+# Copyright (C) 1999-2005, 2007 Heiko Oberdiek.
 #
 # This work may be distributed and/or modified under the
 # conditions of the LaTeX Project Public License, either version 1.3
@@ -26,10 +26,10 @@ $^W=1; # turn warning on
 #
 my $file        = "thumbpdf.pl";
 my $program     = uc($&) if $file =~ /^\w+/;
-my $version     = "3.8";
-my $date        = "2005/07/06";
+my $version     = "3.9";
+my $date        = "2007/11/07";
 my $author      = "Heiko Oberdiek";
-my $copyright   = "Copyright (c) 1999-2005 by $author.";
+my $copyright   = "Copyright (c) 1999-2005, 2007 by $author.";
 #
 # Reqirements: Perl5, Ghostscript
 # History:
@@ -142,6 +142,8 @@ my $copyright   = "Copyright (c) 1999-2005 by $author.";
 #      by pdfTeX 1.20a.
 #   2005/07/06 v3.8:
 #    * Fix because of pdfTeX 1.30.
+#   2007/11/07 v3.9:
+#    * Deprecation warning of perl 5.8.8 fixed.
 #
 
 ### program identification
@@ -816,7 +818,7 @@ if ($::opt_makepdf)
             "\"";
   print "> $cmd\n" if $::opt_verbose;
   my @capture = `$cmd`;
-  if (!defined(@capture))
+  if (!@capture)
   {
     die "$Error Cannot execute pdfTeX!\n";
   }
@@ -900,7 +902,7 @@ if ($::opt_makedata)
   while (<PDF>)
   {
     $lineno++;
-    
+
     # continue, if comment line (2nd line of PDF output by pdfTeX 1.30)
     next if /^%/;