summaryrefslogtreecommitdiffstats
path: root/Spline/Srs.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Spline/Srs.pm')
-rw-r--r--Spline/Srs.pm22
1 files changed, 7 insertions, 15 deletions
diff --git a/Spline/Srs.pm b/Spline/Srs.pm
index 597e3ed..ed83bac 100644
--- a/Spline/Srs.pm
+++ b/Spline/Srs.pm
@@ -99,15 +99,12 @@ sub reverse($) {
my $err = $@;
if ($err) {
- if ($err =~ m/Invalid hash/) {
- my $fallback = replace_srsalt_chars($addr);
- return $self->{srs}->reverse($fallback);
- }
-
- die $err;
+ die $err unless $err =~ m/Invalid hash/;
+ $addr = replace_srsalt_chars($addr);
+ }
+ else {
+ return $result;
}
-
- return $result;
}
return $self->{srs}->reverse($addr);
@@ -125,15 +122,10 @@ sub handle($$) {
$result = $self->reverse($key);
}
else {
- return "PERM Invalid request";
+ die 'Invalid request';
}
- if (!defined($result)) {
- return 'NOTFOUND ';
- }
- else {
- return 'OK ' . $result;
- }
+ return $result;
}
1;