From a2b50c9e2fd33a857c85356ad0647c06605e3dd4 Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alex@spline.inf.fu-berlin.de>
Date: Fri, 17 Jun 2016 21:19:45 +0200
Subject: Fix handler call

---
 Spline/Socketmap.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'Spline')

diff --git a/Spline/Socketmap.pm b/Spline/Socketmap.pm
index 6633525..20c8078 100644
--- a/Spline/Socketmap.pm
+++ b/Spline/Socketmap.pm
@@ -11,9 +11,11 @@ our @EXPORT_OK = qw( );
 our $timeout = 10;
 our $handler = undef; 
 
-sub call_handler(@) {
-    return unless ref($handler) eq 'CODE';
-    return \&$handler(@_);
+
+sub call_handler($@) {
+    die 'No handler configured' unless ref($handler) eq 'CODE';
+
+    return &$handler(@_);
 }
 
 sub handle_request($) {
-- 
cgit v1.2.3-1-g7c22