installperl couldn't tell whether it had run tests or not.

Subject: [PATCH] Re: installperl and t/TEST
Message-ID: <20000824080053.2494.qmail@foad.org>

p4raw-id: //depot/perl@6794

diff --git a/Makefile.SH b/Makefile.SH
index fb3a4fc..71a077e 100644 (file)
--- a/Makefile.SH
+++ b/Makefile.SH
@@ -720,7 +720,7 @@ _cleaner1:
        done
 
 _cleaner2:
-       rm -f core core.*perl.*.? *perl.core t/core t/core.perl.*.? t/*perl.core t/misctmp* t/forktmp* t/tmp* t/c t/perl .?*.c so_locations $(LIBPERL_NONSHR) $(MINIPERL_NONSHR)
+       rm -f core core.*perl.*.? *perl.core t/core t/core.perl.*.? t/*perl.core t/misctmp* t/forktmp* t/tmp* t/c t/perl t/ran_tests .?*.c so_locations $(LIBPERL_NONSHR) $(MINIPERL_NONSHR)
        rm -rf $(addedbyconf)
        rm -f $(FIRSTMAKEFILE) $(FIRSTMAKEFILE).old
        rm -f $(private)
@@ -783,6 +783,7 @@ test check: test-prep
        else \
          cd t && PERL_SKIP_TTY_TEST=1 $(LDLIBPTH) ./perl TEST; \
        fi
+       @echo "Ran tests" > t/ran_tests
 
 utest ucheck: test-prep
        if (true </dev/tty) >/dev/null 2>&1; then \

diff --git a/installperl b/installperl
index f296712..23078d2 100755 (executable)
--- a/installperl
+++ b/installperl
@@ -154,7 +154,7 @@ if ($d_dosuid && $>) { die "You must run as root to install suidperl\n"; }
 -x 'perl' . $exe_ext   || die "perl isn't executable!\n";
 -x 'suidperl' . $exe_ext|| die "suidperl isn't executable!\n" if $d_dosuid;
 
--x 't/TEST'            || $Is_W32
+-f 't/ran_tests'       || $Is_W32
                        || warn "WARNING: You've never run 'make test'!!!",
                                "  (Installing anyway.)\n";