X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=utils%2Fhp2ps%2FMain.c;h=947ff46731da8870d9c7036b6b90130de36a90a7;hp=53f010ba1e07a4f2474c06215c949d27bfe5c7e0;hb=f0a352756958c7c841da25143f7fdea610ab9a21;hpb=90b9566607ef837329434657c8fabc4bdffdf1af

diff --git a/utils/hp2ps/Main.c b/utils/hp2ps/Main.c
index 53f010b..947ff46 100644
--- a/utils/hp2ps/Main.c
+++ b/utils/hp2ps/Main.c
@@ -147,7 +147,6 @@ nextarg: ;
 	DropSuffix(pathName, ".hp");
 #if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
 	DropSuffix(pathName, ".exe");
-        pathName = copystring2(pathName,".exe");
 #endif
 	baseName = copystring(Basename(pathName));