From e4fb8e2ded39e7068dc433a1346c20813c8c8e5c Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sun, 8 Dec 2013 19:15:25 +0100 Subject: [PATCH] Fix sfio breakage in PerlIO_findFILE() caused by commit de009b76d60bdeb8. One hunk of commit de009b76d60bdeb8 (April 2005) makes a variable const, which is then assigned to. This is in sfio-specific code, so was not noticed. This change was merged to maint-5.8 as part of commit f1c3982b668c9e30 (Sep 2005). --- perlio.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perlio.c b/perlio.c index d89b9bb..1369cd8 100644 --- a/perlio.c +++ b/perlio.c @@ -416,7 +416,7 @@ FILE * PerlIO_findFILE(PerlIO *pio) { const int fd = PerlIO_fileno(pio); - FILE * const f = fdopen(fd, "r+"); + FILE * f = fdopen(fd, "r+"); PerlIO_flush(pio); if (!f && errno == EINVAL) f = fdopen(fd, "w"); -- 2.7.4