Loose the "Loading..." warning.

Another bug in fallback support

p4raw-id: //depot/perlio@8290

diff --git a/ext/Encode/Encode.pm b/ext/Encode/Encode.pm
index dedb8e9..42c9e84 100644 (file)
--- a/ext/Encode/Encode.pm
+++ b/ext/Encode/Encode.pm
@@ -378,7 +378,7 @@ sub loadEncoding
      last unless $type eq '#';
     }
    $class .= ('::'.(($type eq 'E') ? 'Escape' : 'Table'));
-   warn "Loading $file";
+   #warn "Loading $file";
    return $class->read($fh,$name,$type);
   }
  else

diff --git a/ext/Encode/encengine.c b/ext/Encode/encengine.c
index 4c68dd9..513ef9a 100644 (file)
--- a/ext/Encode/encengine.c
+++ b/ext/Encode/encengine.c
@@ -106,7 +106,7 @@ do_encode(encpage_t *enc, const U8 *src, STRLEN *slen, U8 *dst, STRLEN dlen, STR
    U8 byte = *s;
    while (byte > e->max)
     e++;
-   if (byte >= e->min && e->slen && (approx || !e->slen & 0x80))
+   if (byte >= e->min && e->slen && (approx || !(e->slen & 0x80)))
     {
      const U8 *cend = s + (e->slen & 0x7f);
      if (cend <= send)