This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Recursively delete all ppport.h files, instead of running mkppport --clean.
authorNicholas Clark <nick@ccl4.org>
Tue, 29 Sep 2009 18:40:05 +0000 (19:40 +0100)
committerNicholas Clark <nick@ccl4.org>
Tue, 29 Sep 2009 18:40:05 +0000 (19:40 +0100)
mkppport --clean relies on miniperl not yet being deleted, which doesn't always
hold. Idea blatently stolen from Steve Hay's commit 85741d00cbd04edb.

Makefile.SH

index 7e6a099..b2d4d15 100644 (file)
@@ -1226,7 +1226,10 @@ _cleaner1:
        sh $(CLEAN).sh ; \
        fi
        rm -f realclean.sh veryclean.sh
-       -@test ! -f ./$(MINIPERL_EXE) || $(MINIPERL) mkppport --clean
+       -for file in `find cpan dist ext -name ppport.h` ; do rm -f $$file; done
+
+# Dear POSIX, thanks for making the default to xargs to be
+# run once if nothhing is passed in. It is such a great help.
 
 # Some systems do not support "?", so keep these files separate.
 _cleaner2: