diff options
| -rw-r--r-- | lib/Tie/Handle/stdhandle.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Tie/Handle/stdhandle.t b/lib/Tie/Handle/stdhandle.t index 861bdab116..ff2a18bec3 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"); |