Changeset 1353

Timestamp:

08/17/06 15:26:13

Author:

miyagawa

Message:

chimps-client: check deps before actually running

Files:

• trunk/plagger/tools/chimps-client.pl (modified) (2 diffs)

trunk/plagger/tools/chimps-client.pl

@@ -12 +12 @@
-
-chdir "$FindBin::Bin/..";
+check_dependencies();
+
-my @tests = map glob, qw(t/*.t t/*/*.t t/*/*/*.t);
-my $start = time;
@@ -67 +69 @@
-    return;
-}
+
+sub check_dependencies {
+    warn "Checking dependencies ...\n";
+    my $out = `$Config{perlpath} Makefile.PL --default`;
+
+    if ($out =~ /Dependencies will be installed/) {
+        die "You need to install dependencies first.\n";
+    }
+    warn "Done.\n";
+}