X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=bin%2Fexx;fp=bin%2Fexx;h=88933d06a932325f7f62d54b619b816f5b5ec9cc;hp=15e7832f7978a539c22afde384154a4bd3851cf1;hb=56d5aed744d20556a539dcd8a708c8ec22cd8dce;hpb=404420ac7dcab3b013c6cd3b7cb488f2056c3c46

diff --git a/bin/exx b/bin/exx
index 15e7832..88933d0 100755
--- a/bin/exx
+++ b/bin/exx
@@ -6,7 +6,7 @@ use strict;
 use warnings;
 
 use IO::Handle;
-use Cwd qw(chdir fastgetcwd);
+use Cwd qw(chdir cwd);
 
 use constant FORMATS=>{
 	"rpm"=>'rpm2cpio !|cpio -id --quiet',	#-v #FIXME: --sparse doesn't work, why?
@@ -19,7 +19,7 @@ use constant FORMATS=>{
 die "Syntax: $0 <pathname((".join("|",map(".$_",sort keys %{+FORMATS})).")|=<ext>)>..."
 		if !@ARGV;
 
-my $origdir=fastgetcwd;
+my $origdir=cwd;
 for my $fname (@ARGV) {
 	$fname=~m#([^/]+)([.=])(\L[^./]+\E)$# or die "Extension not found for archive: $fname";
 	my($path,$base,$ext)=($`,$1,$3);