Update Cwd.pm to work on Guix & NixOS

Perl · Apr 30, 2021 · 8160623 · 8160623
1 parent cc442aa
commit 8160623
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm
@@ -155,6 +155,8 @@ if($^O ne 'MSWin32') {
     foreach my $try ('/bin/pwd',
 		     '/usr/bin/pwd',
 		     '/QOpenSys/bin/pwd', # OS/400 PASE.
+		     '/run/current-system/profile/bin/pwd', # GUIX
+		     '/run/current-system/sw/bin/pwd' #NixOS
 		    ) {
 	if( -x $try ) {
 	    $pwd_cmd = $try;