no bug - reformat all the code using the new perltidy rules

1 files changed, 14 insertions, 14 deletions

diff --git a/extensions/Push/lib/Constants.pm b/extensions/Push/lib/Constants.pm
index 09c5e464c..c021b32f4 100644
--- a/extensions/Push/lib/Constants.pm
+++ b/extensions/Push/lib/Constants.pm
@@ -14,14 +14,14 @@ use warnings;
 use base 'Exporter';
 
 our @EXPORT = qw(
-    PUSH_RESULT_OK
-    PUSH_RESULT_IGNORED
-    PUSH_RESULT_TRANSIENT
-    PUSH_RESULT_ERROR
-    PUSH_RESULT_UNKNOWN
-    push_result_to_string
-
-    POLL_INTERVAL_SECONDS
+  PUSH_RESULT_OK
+  PUSH_RESULT_IGNORED
+  PUSH_RESULT_TRANSIENT
+  PUSH_RESULT_ERROR
+  PUSH_RESULT_UNKNOWN
+  push_result_to_string
+
+  POLL_INTERVAL_SECONDS
 );
 
 use constant PUSH_RESULT_OK        => 1;
@@ -31,12 +31,12 @@ use constant PUSH_RESULT_ERROR     => 4;
 use constant PUSH_RESULT_UNKNOWN   => 5;
 
 sub push_result_to_string {
-    my ($result) = @_;
-    return 'OK'              if $result == PUSH_RESULT_OK;
-    return 'OK-IGNORED'      if $result == PUSH_RESULT_IGNORED;
-    return 'TRANSIENT-ERROR' if $result == PUSH_RESULT_TRANSIENT;
-    return 'FATAL-ERROR'     if $result == PUSH_RESULT_ERROR;
-    return 'UNKNOWN'         if $result == PUSH_RESULT_UNKNOWN;
+  my ($result) = @_;
+  return 'OK'              if $result == PUSH_RESULT_OK;
+  return 'OK-IGNORED'      if $result == PUSH_RESULT_IGNORED;
+  return 'TRANSIENT-ERROR' if $result == PUSH_RESULT_TRANSIENT;
+  return 'FATAL-ERROR'     if $result == PUSH_RESULT_ERROR;
+  return 'UNKNOWN'         if $result == PUSH_RESULT_UNKNOWN;
 }
 
 use constant POLL_INTERVAL_SECONDS => 30;