X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute%2FUser.pm;h=d492c27bf7769050d20878c7279f9ef4f7d90512;hb=12eefe496e1a6d18448b3cc36d5732e9d34b873e;hp=adb2bbd17f25e5395aed9bffd189d3b5ca7d3e86;hpb=febdc9bd8f6cd065d217ba089fab4361e9980f35;p=spider.git

diff --git a/perl/Route/User.pm b/perl/Route/User.pm
index adb2bbd1..d492c27b 100644
--- a/perl/Route/User.pm
+++ b/perl/Route/User.pm
@@ -66,7 +66,9 @@ sub get
 {
 	my $call = shift;
 	$call = shift if ref $call;
-	return $list{uc $call};
+	my $ref = $list{uc $call};
+	dbg("Failed to get User $call" ) if !$ref && isdbg('routerr');
+	return $ref;
 }
 
 sub addparent