[PATHCH] Scalar::Util::readonly ...

[p5sagit/p5-mst-13.2.git] / utils / c2ph.PL

diff --git a/utils/c2ph.PL b/utils/c2ph.PL
index 11ab606..39545e3 100644 (file)
--- 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;
 }