summaryrefslogtreecommitdiffstats
path: root/extensions/Push/lib/Constants.pm
diff options
context:
space:
mode:
Diffstat (limited to 'extensions/Push/lib/Constants.pm')
-rw-r--r--extensions/Push/lib/Constants.pm28
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;