From 9d713c04e29b81e0f778f7d1861f600f63cf958a Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 5 Jan 2001 10:54:56 +0000 Subject: fixed printing to STDOUT while extracting (usefull if extracting to STDOUT :-) --- packdrake.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/packdrake.pm b/packdrake.pm index bdad288..0897131 100644 --- a/packdrake.pm +++ b/packdrake.pm @@ -363,7 +363,7 @@ sub extract_archive { my $newfile = "$dir/$file"; - print "extracting $file\n"; + print STDERR "extracting $file\n"; for ($packer->{data}{$file}[0]) { /l/ && do { symlink_ $packer->{data}{$file}[1], $newfile; last; }; /d/ && do { mkdir_ $newfile; last; }; -- cgit v1.2.1