[Bps-public-commit] r12319 - in TAP-Harness-Remote-EC2: lib/TAP/Harness/Remote

[alexmv at bestpractical.com]

Author: alexmv
Date: Wed May 14 15:29:39 2008
New Revision: 12319

Modified:
   TAP-Harness-Remote-EC2/   (props changed)
   TAP-Harness-Remote-EC2/lib/TAP/Harness/Remote/EC2.pm

Log:
 r31698 at kohr-ah:  chmrr | 2008-05-14 15:29:29 -0400
  * Can't delete a method call -- whoops


Modified: TAP-Harness-Remote-EC2/lib/TAP/Harness/Remote/EC2.pm
==============================================================================
--- TAP-Harness-Remote-EC2/lib/TAP/Harness/Remote/EC2.pm	(original)
+++ TAP-Harness-Remote-EC2/lib/TAP/Harness/Remote/EC2.pm	Wed May 14 15:29:39 2008
@@ -47,7 +47,8 @@
     $self->SUPER::load_remote_config;
     warn
         "Useless 'host' configuration parameter set for TAP::Harness::Remote::EC2\n"
-        if delete $self->remote_config("host");
+        if grep {defined} @{$self->remote_config("host")};
+    delete $self->{remote_config}{host};
 
     die "Configuration failed to include required 'access_key' parameter\n"
         unless $self->remote_config("access_key");