add missing return

diff --git a/perl/Thingy/Rt.pm b/perl/Thingy/Rt.pm
index bd5fd95d84675c9c8e552d07b6bdbb97c3f2d15c..29ec2cfdbb72758048b3bec145a40c07d51fa12d 100644 (file)
--- a/perl/Thingy/Rt.pm
+++ b/perl/Thingy/Rt.pm
@@ -209,5 +209,6 @@ sub upd_user_rec
        $user->homenode($parentcall) if !$user->homenode;
        $user->node($parentcall);
        $user->lastin($main::systime) unless DXChannel->get($call);
+       return $user;
 }
 1;