summaryrefslogtreecommitdiff
path: root/dist/Safe/Safe.pm
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgs@consttype.org>2010-02-24 15:38:10 +0100
committerRafael Garcia-Suarez <rgs@consttype.org>2010-02-24 15:41:55 +0100
commitd2177bdff53b8195a5f64299d691c735a161f905 (patch)
tree220115ebbefe21e894d8d4d425b7c03bfcdfefae /dist/Safe/Safe.pm
parente4e6525004a789fccbc9985446369454092d5b77 (diff)
downloadperl-d2177bdff53b8195a5f64299d691c735a161f905.tar.gz
Also share SWASHGET in perls < 5.10, before it was translated from perl to C
Diffstat (limited to 'dist/Safe/Safe.pm')
-rw-r--r--dist/Safe/Safe.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/dist/Safe/Safe.pm b/dist/Safe/Safe.pm
index 70f0d2dfb7..06d369b244 100644
--- a/dist/Safe/Safe.pm
+++ b/dist/Safe/Safe.pm
@@ -83,7 +83,9 @@ my $default_share = [qw[
$version::STRICT
$version::LAX
@version::ISA
-], ($] >= 5.008001 && qw[
+], ($] < 5.010 && qw[
+ &utf8::SWASHGET
+]), ($] >= 5.008001 && qw[
&Regexp::DESTROY
]), ($] >= 5.010 && qw[
&re::is_regexp