diff options
Diffstat (limited to 'Build/source/utils/psutils/psutils-1.17/fixmacps.pl')
-rw-r--r-- | Build/source/utils/psutils/psutils-1.17/fixmacps.pl | 6 |
1 files changed, 4 insertions, 2 deletions
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"; |