X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute%2FUser.pm;h=d492c27bf7769050d20878c7279f9ef4f7d90512;hb=9685d27bb27511ec2409f323096c68a3b25156fd;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