diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-13 03:36:22 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-13 03:36:22 +0000 |
commit | 77caf834c201d3982a815b3d51794b6e3a769c6d (patch) | |
tree | 31ef7444104242d2bf7eea2f7821bf686fd1a308 /lib | |
parent | 434f716607831e7b291d6f6bb7fb9611e6d0f7ca (diff) | |
download | perl-77caf834c201d3982a815b3d51794b6e3a769c6d.tar.gz |
Remove unicode::distinct, as per Inaba Hiroto.
p4raw-id: //depot/perl@11342
Diffstat (limited to 'lib')
-rw-r--r-- | lib/unicode/distinct.pm | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/lib/unicode/distinct.pm b/lib/unicode/distinct.pm deleted file mode 100644 index 74f791f1a5..0000000000 --- a/lib/unicode/distinct.pm +++ /dev/null @@ -1,35 +0,0 @@ -package unicode::distinct; - -our $VERSION = '0.01'; - -$unicode::distinct::hint_bits = 0x01000000; - -sub import { - $^H |= $unicode::distinct::hint_bits; -} - -sub unimport { - $^H &= ~$unicode::distinct::hint_bits; -} - -1; -__END__ - -=head1 NAME - -unicode::distinct - Perl pragma to strictly distinguish UTF8 data and non-UTF data. - -=head1 SYNOPSIS - - use unicode::distinct; - no unicode::distinct; - -=head1 DESCRIPTION - - *NOT YET* - -=head1 SEE ALSO - -L<perlunicode>, L<utf8> - -=cut |