summaryrefslogtreecommitdiff
path: root/Build/source/utils/psutils/psutils-1.17-PATCHES/patch-07-fixmacps
blob: 177e3e8c1f1abac09957a98e71e88d568bac5edf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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";