Don't bother trying to set $*USER/GROUP on Windows

rakudo · Jun 3, 2014 · a8798f7 · a8798f7
1 parent 68060fe
commit a8798f7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/Process.pm b/src/core/Process.pm
@@ -33,7 +33,7 @@
     }
 
     # probably needs some nqp::op, LHF for someone?
-    if try { qx/id/ } -> $id {
+    if !$*DISTRO.is-win && try { qx/id/ } -> $id {
         if $id ~~ m/^
           [ uid "=" $<uid>=(\d+) ]
           [ "(" $<user>=(<-[ ) ]>+) ")" ]