From 9a7f812ae9c714b5253bbec3244ca19afff6e5b7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 25 Jan 2002 19:10:16 +0000 Subject: remove_advertising: use rm_rf since we don't have the real list of files (the .pl's are not in @advertising_images) --- perl-install/install_any.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index b207962c7..eaf632f9a 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1043,8 +1043,7 @@ sub copy_advertising { sub remove_advertising { my ($o) = @_; - unlink @advertising_images; - rmdir "$o->{prefix}/tmp/drakx-images"; + rm_rf("$o->{prefix}/tmp/drakx-images"); @advertising_images = (); } -- cgit v1.2.1