From: Nicholas Clark <nick@ccl4.org>
Date: Mon, 26 Feb 2001 00:27:19 +0000 (+0000)
Subject: perlio - unknown layer
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a0ea11f27510bfd5c321cc9b6bbb1b1dc64a058c;p=p5sagit%2Fp5-mst-13.2.git

perlio - unknown layer
Message-ID: <20010226002719.E23333@plum.flirble.org>

p4raw-id: //depot/perl@8951
---

diff --git a/perlio.c b/perlio.c
index 982a98c..9f12be6 100644
--- a/perlio.c
+++ b/perlio.c
@@ -684,8 +684,10 @@ PerlIO_apply_layers(pTHX_ PerlIO *f, const char *mode, const char *names)
               return -1;
             }
           }
-         else
+         else {
           Perl_warn(aTHX_ "perlio: unknown layer \"%.*s\"",(int)llen,s);
+	  return -1;
+	 }
         }
        s = e;
       }