Fix deprecation inside CORE

rakudo · May 16, 2014 · f57749e · f57749e
1 parent 94bd372
commit f57749e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/Str.pm b/src/core/Str.pm
@@ -537,7 +537,7 @@ my class Str does Stringy { # declared in BOOTSTRAP
     multi method perl(Str:D:) {
         my $result = '"';
 #?if parrot
-        my $icu = $*VM<config><has_icu>;
+        my $icu = $*VM.config<has_icu>;
         for ^self.chars -> $i {
             my $ch = self.substr($i, 1);
             $result ~= %esc{$ch}