From 7a6da24c189d4507eab9c21153e8c11d42d9f795 Mon Sep 17 00:00:00 2001
From: David Mitchell <davem@iabyn.com>
Date: Wed, 23 Oct 2013 16:40:55 +0100
Subject: [PATCH] stdhandle.t: unlink the right file.

It writes to "afile", but initially deleted "afile.new" if it already
existed.
---
 lib/Tie/Handle/stdhandle.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Tie/Handle/stdhandle.t b/lib/Tie/Handle/stdhandle.t
index 861bdab..ff2a18b 100644
--- a/lib/Tie/Handle/stdhandle.t
+++ b/lib/Tie/Handle/stdhandle.t
@@ -13,7 +13,7 @@ tie *tst,Tie::StdHandle;
 
 $f = 'tst';
 
-unlink("afile.new") if -f "afile";
+unlink("afile") if -f "afile";
 
 ok(open($f,"+>afile"), "open +>afile");
 ok(open($f, "+<", "afile"), "open +<, afile");
-- 
2.7.4