X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=utils%2Fc2ph.PL;h=39545e3f8ac043b71e9e496e4ebda22e51e9a97c;hb=802134916c56985ba8dc700565240474646eb9f7;hp=11ab6064d00b43a96e2a0adf494f909dea06e10e;hpb=16ed468695c21630f18883bfbedc3d5170ddc8b2;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/utils/c2ph.PL b/utils/c2ph.PL
index 11ab606..39545e3 100644
--- a/utils/c2ph.PL
+++ b/utils/c2ph.PL
@@ -1320,7 +1320,7 @@ EOF
 	$intrinsics{$_[1]} = $template{$_[0]};
     }
     close(PIPE) || die "couldn't read intrinsics!";
-    unlink($TMP, '$SAFEDIR/a.out');
+    unlink($TMP, "$SAFEDIR/a.out");
     print STDERR "done\n" if $trace;
 }