X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=cop.h;h=fc19494e25d4df988276d8a272e158892c1bab81;hb=5ad5b34cb2af84d4f37219a5dee752fca0459151;hp=0c85a4b876769a9aeae043afef95c5515b5c43d8;hpb=1bbbfc5065f1f4b15e64694ca559c8dbefbb69d2;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/cop.h b/cop.h
index 0c85a4b..fc19494 100644
--- a/cop.h
+++ b/cop.h
@@ -232,11 +232,7 @@ struct cop {
 #define CopLINE_set(c,l)	(CopLINE(c) = (l))
 
 /* OutCopFILE() is CopFILE for output (caller, die, warn, etc.) */
-#ifdef MACOS_TRADITIONAL
-#  define OutCopFILE(c) MacPerl_MPWFileName(CopFILE(c))
-#else
-#  define OutCopFILE(c) CopFILE(c)
-#endif
+#define OutCopFILE(c) CopFILE(c)
 
 /* If $[ is non-zero, it's stored in cop_hints under the key "$[", and
    HINT_ARYBASE is set to indicate this.