Resync with mainline

[p5sagit/p5-mst-13.2.git] / lib / byte_heavy.pl

diff --git a/lib/byte_heavy.pl b/lib/byte_heavy.pl
index 07c908a..ec05585 100644 (file)
--- a/lib/byte_heavy.pl
+++ b/lib/byte_heavy.pl
@@ -1,8 +1,8 @@
 package byte;
 
-sub length ($)
-{
- return CORE::length($_[0]);
+sub length ($) {
+    BEGIN { byte::import() }
+    return CORE::length($_[0]);
 }
 
 1;