--- IO-AIO/typemap	2006/10/31 00:32:19	1.5
+++ IO-AIO/typemap	2006/10/31 00:34:27	1.6
@@ -14,5 +14,5 @@
 
 T_SV8
 	($var) = $arg;
-        if (SvPOK ($var) && !sv_utf8_downgrade ($var, 1))
+        if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
           croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")