Bug 1377933 - Remove trailing whitespace from all perl files

1 files changed, 6 insertions, 6 deletions

diff --git a/Bugzilla/WebService/Util.pm b/Bugzilla/WebService/Util.pm
index b0621b000..29ff05448 100644
--- a/Bugzilla/WebService/Util.pm
+++ b/Bugzilla/WebService/Util.pm
@@ -203,7 +203,7 @@ sub _delete_bad_keys {
         foreach my $key (keys %$item) {
             # Making something a hash key always untaints it, in Perl.
             # However, we need to validate our argument names in some way.
-            # We know that all hash keys passed in to the WebService will 
+            # We know that all hash keys passed in to the WebService will
             # match \w+, so we delete any key that doesn't match that.
             if ($key !~ /^[\w\.\-]+$/) {
                 delete $item->{$key};
@@ -220,14 +220,14 @@ sub validate  {
     # sent any parameters at all, and we're getting @keys where
     # $params should be.
     return ($self, undef) if (defined $params and !ref $params);
-    
-    # If @keys is not empty then we convert any named 
+
+    # If @keys is not empty then we convert any named
     # parameters that have scalar values to arrayrefs
     # that match.
     foreach my $key (@keys) {
         if (exists $params->{$key}) {
-            $params->{$key} = ref $params->{$key} 
-                              ? $params->{$key} 
+            $params->{$key} = ref $params->{$key}
+                              ? $params->{$key}
                               : [ $params->{$key} ];
         }
     }
@@ -309,7 +309,7 @@ internally in the WebService code.
 
 =head1 SYNOPSIS
 
- filter({ include_fields => ['id', 'name'], 
+ filter({ include_fields => ['id', 'name'],
           exclude_fields => ['name'] }, $hash);
  my $wants = filter_wants $params, 'field_name';
  validate(@_, 'ids');