diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-02-17 15:02:56 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2011-02-17 15:41:53 -0700 |
| commit | 3a3263a09154df7a0ba13264c721cd371f7be445 (patch) | |
| tree | fcb9ef2fc938aec9601d1058eba2588666e706bb /lib/utf8_heavy.pl | |
| parent | b83080de5c42543809ce9004bcdbcd3162a00e70 (diff) | |
| download | perl-3a3263a09154df7a0ba13264c721cd371f7be445.tar.gz | |
Deprecate current user-defined case mapping
This has many issues. I'm working on a CPAN module to take over
its functionality that should be ready in time for the 5.14 release.
Diffstat (limited to 'lib/utf8_heavy.pl')
| -rw-r--r-- | lib/utf8_heavy.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/utf8_heavy.pl b/lib/utf8_heavy.pl index 4825b0f628..41cace887b 100644 --- a/lib/utf8_heavy.pl +++ b/lib/utf8_heavy.pl @@ -389,6 +389,7 @@ sub croak { require Carp; Carp::croak(@_) } no strict 'refs'; $list = &{$map}; + warnings::warnif('deprecated', "User-defined case-mapping '$type' is deprecated"); last GETFILE; } } |