X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fbyte.pm;h=0424e1778da9bd374f8bfa9602238e00957742a6;hb=0994714a4e4e0304c91b2fa0c73d50669931b7e2;hp=33ffb769e8403de721896df9ccc80e1ec61df6ae;hpb=393fec973b1b95a178b4b9600173880d9f93debf;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/byte.pm b/lib/byte.pm
index 33ffb76..0424e17 100644
--- a/lib/byte.pm
+++ b/lib/byte.pm
@@ -1,11 +1,11 @@
 package byte;
 
 sub import {
-    $^H |= 0x00000010;
+    $^H |= 0x00000008;
 }
 
 sub unimport {
-    $^H &= ~0x00000010;
+    $^H &= ~0x00000008;
 }
 
 sub AUTOLOAD {
@@ -38,9 +38,7 @@ the effect of C<use byte> within the current lexical scope.
 
 Perl normally assumes character semantics in the presence of
 character data (i.e. data that has come from a source that has
-been marked as being of a particular character encoding) or when
-the global $^U flag is enabled.  [XXX: implement -C command line
-switch and mention that instead of $^U?]
+been marked as being of a particular character encoding).
 
 To understand the implications and differences between character
 semantics and byte semantics, see L<perlunicode>.