mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-26 08:41:47 -07:00
Code Issues Projects Releases Wiki Activity

Use rmtree instead of unlink: clang creates directories.

Browse source 
Copied from Perforce
 Change: 182211
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Gareth Rees 2013-05-25 12:49:07 +01:00
parent e5d7987978
commit f9c1a044ac
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
mps/test/test/script/clib
View file

@ -7,6 +7,8 @@
1;
use File::Path qw(rmtree);
sub clib {
my $success = 1;
my $tlfile;
@ -50,7 +52,7 @@ sub objpurge {
}
&logcomment("Cleaning out old object files.");
foreach (readdir(DIR)) {
unless ($_ eq "." || $_ eq ".." || unlink $obj_dir."/".$_) {
unless ($_ eq "." || $_ eq ".." || rmtree $obj_dir."/".$_) {
&logcomment(" ... but failed to delete $_.");
}
}