Bug #81718 for VM-EC2: pod issue leading to pod2man errors

There are some errors in perl pod leading to errors in pod2man to get man pages. Please find a patch atttached

--- a/bin/migrate-ebs-image.pl +++ b/bin/migrate-ebs-image.pl @@ -2,7 +2,7 @@ =head1 NAME -migrate-ebs-image.pl Copy an EBS-backed Amazon Image from one region to another +migrate-ebs-image.pl - Copy an EBS-backed Amazon Image from one region to another =head1 SYNOPSYS --- a/lib/VM/EC2.pm +++ b/lib/VM/EC2.pm @@ -729,9 +729,13 @@ return $self->call('DescribeRegions',@params); } -=head2 @zones = $ec2->describe_availability_zones(@names) +=head2 describe_availability_zones(@names) -=head2 @zones = $ec2->describe_availability_zones(-zone_name=>\@names,-filter=>\%filters) +@zones = $ec2->describe_availability_zones(@names) + +=head2 describe_availability_zones(-zone_name=>\@names,-filter=>\%filters) + +@zones = $ec2->describe_availability_zones(-zone_name=>\@names,-filter=>\%filters) Describe availability zones and return a list of VM::EC2::AvailabilityZone objects. Call with no arguments to return @@ -2344,7 +2348,7 @@ =head2 $boolean = $ec2->enable_volume_io(-volume_id=>$volume_id) Given the ID of a volume whose I/O has been disabled (e.g. due to -hardware degradation), this method will reenable the I/O and return +hardware degradation), this method will re-enable the I/O and return true if successful. =cut @@ -3165,9 +3169,9 @@ return $self->call('DescribeReservedInstancesOfferings',@param); } -=head $id = $ec2->purchase_reserved_instances_offering($offering_id) +=head2 $id = $ec2->purchase_reserved_instances_offering($offering_id) -=head $id = $ec2->purchase_reserved_instances_offering(%args) +=head2 $id = $ec2->purchase_reserved_instances_offering(%args) Purchase one or more reserved instances based on an offering. @@ -3524,6 +3528,8 @@ return $self->call('RequestSpotInstances',@p); } +=back + =head2 @requests = $ec2->cancel_spot_instance_requests(@request_ids) This method cancels the pending requests. It does not terminate any --- a/lib/VM/EC2/VPC.pm +++ b/lib/VM/EC2/VPC.pm @@ -2,7 +2,7 @@ =head1 NAME -VM::EC2::VPC +VM::EC2::VPC - Manage EC2 VPC =head1 SYNOPSIS --- a/lib/VM/EC2/Security/Token.pm +++ b/lib/VM/EC2/Security/Token.pm @@ -54,7 +54,7 @@ expiry time between a few seconds and 36 hours. A VM::EC2::Security::Credentials object contained within the token -contains the temporary secret access key, acess key ID, and a session +contains the temporary secret access key, access key ID, and a session token string that unlocks the access key. The credentials object can be serialized into a form suitable for sending to a user via a secure channel, such as SSL or S/MIME e-mail, and unserialized at the --- a/lib/VM/EC2/NetworkInterface/PrivateIpAddress.pm +++ b/lib/VM/EC2/NetworkInterface/PrivateIpAddress.pm @@ -2,7 +2,7 @@ =head1 NAME -VM::EC2::NetworkInterface::PrivateIpAddress +VM::EC2::NetworkInterface::PrivateIpAddress - Manage EC2 private IP address =head1 SYNOPSIS --- a/lib/VM/EC2/Generic.pm +++ b/lib/VM/EC2/Generic.pm @@ -162,7 +162,6 @@ $vol->primary_id; -=back =head2 $xmlns = $object->xmlns --- a/lib/VM/EC2/Dispatch.pm +++ b/lib/VM/EC2/Dispatch.pm @@ -462,7 +462,9 @@ return $class->new($obj,$ec2,@{$parsed}{'xmlns','requestId'}); } -=head2 @objects = $dispatch->fetch_items($raw_xml,$ec2,$container_tag,$object_class,$nokey) +=head2 fetch_items($raw_xml,$ec2,$container_tag,$object_class,$nokey) + +@objects = $dispatch->fetch_items($raw_xml,$ec2,$container_tag,$object_class,$nokey) This is used for XML responses like this: --- a/lib/VM/EC2/Instance.pm +++ b/lib/VM/EC2/Instance.pm @@ -298,9 +298,13 @@ follow its progress by calling the returned image object's current_status() method. -=head2 $imageId = $instance->create_image($name [,$description]) +=head2 create_image($name [,$description]) -=head2 $imageId = $instance->create_image(-name=>$name,-description=>$description,-no_reboot=>$boolean) +$imageId = $instance->create_image($name [,$description]) + +=head2 create_image(name,description,no_reboot) + +$imageId = $instance->create_image(-name=>$name,-description=>$description,-no_reboot=>$boolean) Create an image from this instance and return a VM::EC2::Image object. The instance must be in the "stopped" or "running" state. In the