diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-12-13 14:19:51 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-12-13 14:19:51 +0000 |
commit | 81a055e8de611631d607424adce2e6c5583e193e (patch) | |
tree | 7b07c4cf8fa2ff596403f479070fb9eafe5b78ba | |
parent | fe615a95768003632cdb4e38da4dceb4304cc768 (diff) |
correct fixmacps perl script
git-svn-id: svn://tug.org/texlive/trunk@20722 c570f23f-e606-0410-a88d-b1316a301751
4 files changed, 30 insertions, 2 deletions
diff --git a/Build/source/utils/psutils/psutils-1.17-PATCHES/ChangeLog b/Build/source/utils/psutils/psutils-1.17-PATCHES/ChangeLog index 272c6fd3381..b8ea380e2d5 100644 --- a/Build/source/utils/psutils/psutils-1.17-PATCHES/ChangeLog +++ b/Build/source/utils/psutils/psutils-1.17-PATCHES/ChangeLog @@ -1,3 +1,9 @@ +2010-12-13 Peter Breitenlohner <peb@mppmu.mpg.de> + + * patch-07-fixmacps (new): Adapt to new kpsewhich semantics and + texmf layout. + Change basename => dirname and add 'use File::Basename'. + 2010-12-10 Peter Breitenlohner <peb@mppmu.mpg.de> Patches applied to psutils-1.17 as obtained from CTAN. diff --git a/Build/source/utils/psutils/psutils-1.17-PATCHES/TL-Changes b/Build/source/utils/psutils/psutils-1.17-PATCHES/TL-Changes index 91f4c1c1016..b4af08a325f 100644 --- a/Build/source/utils/psutils/psutils-1.17-PATCHES/TL-Changes +++ b/Build/source/utils/psutils/psutils-1.17-PATCHES/TL-Changes @@ -1,3 +1,6 @@ Changes applied to the psutils-1.17 tree as obtained from: http://mirror.ctan.org/support/psutils/psutils-p17.tar.gz +Rename: + patchlev.h -> patchlev.h.in + diff --git a/Build/source/utils/psutils/psutils-1.17-PATCHES/patch-07-fixmacps b/Build/source/utils/psutils/psutils-1.17-PATCHES/patch-07-fixmacps new file mode 100644 index 00000000000..177e3e8c1f1 --- /dev/null +++ b/Build/source/utils/psutils/psutils-1.17-PATCHES/patch-07-fixmacps @@ -0,0 +1,17 @@ +diff -ur psutils-1.17.orig/fixmacps.pl psutils-1.17/fixmacps.pl +--- psutils-1.17.orig/fixmacps.pl 2006-01-17 22:16:42.000000000 +0100 ++++ psutils-1.17/fixmacps.pl 2010-12-13 15:04:50.973928757 +0100 +@@ -4,9 +4,11 @@ + # Copyright (C) Angus J. C. Duggan 1991-1995 + # See file LICENSE for details. + ++use File::Basename; ++ + $line = 0; # keep line count +-$predir = `kpsewhich -progname=psutils md71_0.ps`; +-$dir=`basename $predir`; ++$predir = `kpsewhich -progname=dvips -format="other text files" md71_0.ps`; ++$dir=`dirname $predir`; + $prefix = "md"; + $default = "md71_0.ps"; + diff --git a/Build/source/utils/psutils/psutils-1.17/fixmacps.pl b/Build/source/utils/psutils/psutils-1.17/fixmacps.pl index 9dcdb8517ce..5ed32467f38 100644 --- a/Build/source/utils/psutils/psutils-1.17/fixmacps.pl +++ b/Build/source/utils/psutils/psutils-1.17/fixmacps.pl @@ -4,9 +4,11 @@ # Copyright (C) Angus J. C. Duggan 1991-1995 # See file LICENSE for details. +use File::Basename; + $line = 0; # keep line count -$predir = `kpsewhich -progname=psutils md71_0.ps`; -$dir=`basename $predir`; +$predir = `kpsewhich -progname=dvips -format="other text files" md71_0.ps`; +$dir=`dirname $predir`; $prefix = "md"; $default = "md71_0.ps"; |