summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-04-19 16:23:18 +0000
committerKarl Berry <karl@freefriends.org>2012-04-19 16:23:18 +0000
commite1be519f38bb37eeadbe6360c90f85a16d5bbe8c (patch)
tree7cf316d9ff7b08198e03991428a9ed0b25175471
parent0137743a7250b6185d580fc65218d4d89dc65abe (diff)
pdfcrop (18apr12)
git-svn-id: svn://tug.org/texlive/trunk@26043 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl8
-rw-r--r--Master/texmf-dist/doc/support/pdfcrop/README5
-rwxr-xr-xMaster/texmf-dist/scripts/pdfcrop/pdfcrop.pl8
3 files changed, 16 insertions, 5 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl b/Build/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl
index e4f2ca181ed..b1e6e966a20 100755
--- a/Build/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl
+++ b/Build/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl
@@ -19,7 +19,8 @@ $^W=1; # turn warning on
# This file "pdfcrop.pl" may be renamed to "pdfcrop"
# for installation purposes.
#
-my $file = "pdfcrop.pl";
+my $prj = 'pdfcrop';
+my $file = "$prj.pl";
my $program = uc($&) if $file =~ /^\w+/;
my $version = "1.33";
my $date = "2012/02/01";
@@ -97,6 +98,9 @@ my $copyright = "Copyright (c) 2002-2012 by $author.";
# method.
# 2011/08/10 v1.32: * Detection for gswin64c.exe added.
# 2012/02/01 v1.33: * Input file can be `-' (standard input).
+# 2012/04/18 v1.34: * Format of --version changed
+# from naked version number to a line with
+# program name, date and version.
### program identification
my $title = "$program $version, $date - $copyright\n";
@@ -418,7 +422,7 @@ GetOptions(
!$::opt_help or usage(0);
if ($::opt_version) {
- print "$version\n";
+ print "$prj $date v$version\n";
exit(0);
}
diff --git a/Master/texmf-dist/doc/support/pdfcrop/README b/Master/texmf-dist/doc/support/pdfcrop/README
index 7b19b3e1f4e..8fdcd314db7 100644
--- a/Master/texmf-dist/doc/support/pdfcrop/README
+++ b/Master/texmf-dist/doc/support/pdfcrop/README
@@ -1,4 +1,4 @@
-README for pdfcrop 2012/02/01 v1.33
+README for pdfcrop 2012/04/18 v1.34
TABLE OF CONTENTS
=================
@@ -240,6 +240,9 @@ L. HISTORY
method.
2011/08/10 v1.32: * Detection for gswin64c.exe added.
2012/02/01 v1.33: * Input file can be `-' (standard input).
+2012/04/18 v1.34: * Format of option --version changed
+ from naked version number to a line with
+ program name, date and version.
M. TODO
=======
diff --git a/Master/texmf-dist/scripts/pdfcrop/pdfcrop.pl b/Master/texmf-dist/scripts/pdfcrop/pdfcrop.pl
index e4f2ca181ed..b1e6e966a20 100755
--- a/Master/texmf-dist/scripts/pdfcrop/pdfcrop.pl
+++ b/Master/texmf-dist/scripts/pdfcrop/pdfcrop.pl
@@ -19,7 +19,8 @@ $^W=1; # turn warning on
# This file "pdfcrop.pl" may be renamed to "pdfcrop"
# for installation purposes.
#
-my $file = "pdfcrop.pl";
+my $prj = 'pdfcrop';
+my $file = "$prj.pl";
my $program = uc($&) if $file =~ /^\w+/;
my $version = "1.33";
my $date = "2012/02/01";
@@ -97,6 +98,9 @@ my $copyright = "Copyright (c) 2002-2012 by $author.";
# method.
# 2011/08/10 v1.32: * Detection for gswin64c.exe added.
# 2012/02/01 v1.33: * Input file can be `-' (standard input).
+# 2012/04/18 v1.34: * Format of --version changed
+# from naked version number to a line with
+# program name, date and version.
### program identification
my $title = "$program $version, $date - $copyright\n";
@@ -418,7 +422,7 @@ GetOptions(
!$::opt_help or usage(0);
if ($::opt_version) {
- print "$version\n";
+ print "$prj $date v$version\n";
exit(0);
}