From ab3216d918c7330bae0a9f1019f970db2c78f3c9 Mon Sep 17 00:00:00 2001
From: Aristotle Pagaltzis <pagaltzis@gmx.de>
Date: Mon, 13 Sep 2010 16:58:24 +0200
Subject: improve open.pm layer class error message

---
 lib/open.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/open.pm b/lib/open.pm
index a6b4250e32..74119ca2b8 100644
--- a/lib/open.pm
+++ b/lib/open.pm
@@ -108,7 +108,7 @@ sub import {
 	    $in = $out = join(' ', @val);
 	}
 	else {
-	    croak "Unknown PerlIO layer class '$type'";
+	    croak "Unknown PerlIO layer class '$type' (need IN, OUT or IO)";
 	}
     }
     ${^OPEN} = join("\0", $in, $out);
-- 
cgit v1.2.1