Update deprecated code

Change $*VM<name> to $*VM.name to eliminate deprecation notice while building Digest::MD5.
cosimo · Jul 3, 2014 · 4d93471 · 4d93471
1 parent 3565ec8
commit 4d93471
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Build.pm b/Build.pm
@@ -5,7 +5,7 @@ use Shell::Command;
 class Build is Panda::Builder {
     method build($workdir) {
         rm_f("$workdir/lib/Digest/MD5.pm");
-        if $*VM<name> eq 'parrot' {
+        if $*VM.name eq 'parrot' {
             cp("$workdir/lib/Digest/MD5.pm.parrot", "$workdir/lib/Digest/MD5.pm");
         } else {
             cp("$workdir/lib/Digest/MD5.pm.perl", "$workdir/lib/Digest/MD5.pm");