X-Git-Url: http://erislabs.net/gitweb/?p=libwww-opensearch-perl.git;a=blobdiff_plain;f=lib%2FWWW%2FOpenSearch%2FAgent.pm;h=1b95c0adc2c6cc56fb82ec1f730ce3b4e37a2949;hp=bc5bbec26ba91acf6746d2b4827532d30475cec8;hb=3e29d833e4fbe59c83e7ae52a7413b193c1083bd;hpb=5127c597102ab37e43b89cc43b4d8ea1b34509cd

diff --git a/lib/WWW/OpenSearch/Agent.pm b/lib/WWW/OpenSearch/Agent.pm
index bc5bbec..1b95c0a 100644
--- a/lib/WWW/OpenSearch/Agent.pm
+++ b/lib/WWW/OpenSearch/Agent.pm
@@ -46,7 +46,7 @@ it under the same terms as Perl itself.
 =cut
 
 sub new {
-    my( $class, @rest ) = @_;
+    my ( $class, @rest ) = @_;
     return $class->SUPER::new(
         agent => join( '/', __PACKAGE__, $WWW::OpenSearch::VERSION ),
         @rest,
@@ -57,7 +57,7 @@ sub new {
 
 sub request {
     my $self     = shift;
-    my $request  = shift; ;
+    my $request  = shift;
     my $response = $self->SUPER::request( $request, @_ );
 
     # allow regular HTTP::Requests to flow through