# in other words mark all messages as being already received
# by this node.
#
-# $Id$
+#
#
# Copyright (c) 1999 Dirk Koopman G1TLH
#
return (1, "usage: catchup <node call> all|[<msgno ...]") unless @f >= 2;
my $call = uc shift @f;
-my $user = DXUser->get_current($call);
+my $user = DXUser::get_current($call);
return (1, "$call not a node") unless $user && $user->sort ne 'U';
my @out;