summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorHauke D <haukex@zero-g.net>2018-12-12 22:26:26 +0100
committerTony Cook <tony@develop-help.com>2019-01-02 11:53:51 +1100
commiteb699a9c8fb7ddfcafc714f1eba1bbc395dc3675 (patch)
treeff461f512b9d45dc0ea10358dc87c7269d7a5ac3 /t
parentb4e880f3b5c8c8ba39c7c767167801a7caf81821 (diff)
downloadperl-eb699a9c8fb7ddfcafc714f1eba1bbc395dc3675.tar.gz
First "eof" should return true
When no file has previously been opened, "eof" should return true. This behavior was broken by 32e653230c7ccc (see also [#60978]).
Diffstat (limited to 't')
-rw-r--r--t/io/tell.t1
1 files changed, 0 insertions, 1 deletions
diff --git a/t/io/tell.t b/t/io/tell.t
index 30adafbc01..ba106f0cc7 100644
--- a/t/io/tell.t
+++ b/t/io/tell.t
@@ -189,7 +189,6 @@ seek *$fh,0,0;
is(tell, 0, "argless tell after seek *\$coercible...");
{
- local $TODO = "not fixed yet";
# [perl #133721]
fresh_perl_is(<<'EOI', 'ok', {}, 'eof with no ${^LAST_FH}');
print "ok" if eof;