summaryrefslogtreecommitdiff
path: root/Build
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 /Build
parent0137743a7250b6185d580fc65218d4d89dc65abe (diff)
pdfcrop (18apr12)
git-svn-id: svn://tug.org/texlive/trunk@26043 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl8
1 files changed, 6 insertions, 2 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);
}