diff options
| -rwxr-xr-x | Build/source/texk/texlive/linked_scripts/pdfcrop/pdfcrop.pl | 8 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/support/pdfcrop/README | 5 | ||||
| -rwxr-xr-x | Master/texmf-dist/scripts/pdfcrop/pdfcrop.pl | 8 |
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); } |