[Rt-commit] r3054 - in rt/branches/3.4-RELEASE: . sbin

[glasser at bestpractical.com]

Author: glasser
Date: Wed Jun  1 18:38:38 2005
New Revision: 3054

Modified:
   rt/branches/3.4-RELEASE/   (props changed)
   rt/branches/3.4-RELEASE/sbin/rt-test-dependencies.in
Log:
 r33653 at tin-foil:  glasser | 2005-06-01 15:19:20 -0400
 fixdeps wasn't working for me (it was trying to detar inside my MiniCPAN!);
 its code was "correct" but presumably one of the other 500 modules that were
 loaded confused CPAN.  (This bug happened both before and after the previous change.)
 Now just uses a system() call to install.


Modified: rt/branches/3.4-RELEASE/sbin/rt-test-dependencies.in
==============================================================================
--- rt/branches/3.4-RELEASE/sbin/rt-test-dependencies.in	(original)
+++ rt/branches/3.4-RELEASE/sbin/rt-test-dependencies.in	Wed Jun  1 18:38:38 2005
@@ -52,7 +52,6 @@
 use strict;
 no warnings qw(numeric redefine);
 use Getopt::Long;
-use CPAN;
 my %args;
 my %deps;
 GetOptions(
@@ -310,13 +309,13 @@
 
 sub resolve_dep {
     my $module = shift;
-    use CPAN;
-    CPAN::Shell->install($module);		
+    system( qq[@PERL@ -MCPAN -e'install("$module")'] );
 }
 
 sub download_mods {
     my %modules;
-
+    use CPAN;
+    
     foreach my $key (keys %deps) {
         my @deps = (@{$deps{$key}});
         while (@deps) {