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

[alexmv at bestpractical.com]

Author: alexmv
Date: Thu Jun 26 15:28:11 2008
New Revision: 13615

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

Log:
 r33516 at kohr-ah:  chmrr | 2008-06-26 15:27:15 -0400
  * Finish updating POD
 r33517 at kohr-ah:  chmrr | 2008-06-26 15:28:04 -0400
  * Mention EC2 objects


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	Thu Jun 26 15:28:11 2008
@@ -91,9 +91,14 @@
     return $self;
 }
 
-=head2 hosts EC2, TYPE
+=head2 hosts EC2 [, STATUS]
 
-Limi
+Returns an array of L<Net::Amazon::EC2::RunningInstances> objects
+which match the C<ami> type specified in the config file, and whose
+status matches the given C<STATUS>.  C<STATUS> may be either a string,
+or a regex; it defaults to "running".
+
+C<EC2> should be a valid L<Net::Amazon::EC2> object.
 
 =cut
 
@@ -110,6 +115,13 @@
         map { @{ $_->instances_set } } @{$running_instances};
 }
 
+=head2 wait_pending EC2.
+
+Waits until all hosts in the "pending" state have started.  C<EC2>
+should be a valid L<Net::Amazon::EC2> object.
+
+=cut
+
 sub wait_pending {
     my $self = shift;
     my ( $ec2 ) = @_;