X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fload%2Fusdb.pl;h=88bf7b1b7ecbd82f66970623df3006bc8a9a221e;hb=refs%2Fheads%2Fstaging;hp=bd45547d106e8d5cd7c52a8fd054c58d7c4afe89;hpb=8178d787d7cc8040fa8958197582bba5c80e6f59;p=spider.git diff --git a/cmd/load/usdb.pl b/cmd/load/usdb.pl index bd45547d..88bf7b1b 100644 --- a/cmd/load/usdb.pl +++ b/cmd/load/usdb.pl @@ -9,15 +9,10 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @out; return (1, $self->msg('e5')) if $self->priv < 9; -return (1, $self->msg('e3', "load/usdb", $line)) if $line && !-r $line; -$line = "$main::data/usdbraw" unless $line; -push @out, (USDB::load($line)); -USDB::init() unless @OUT; -@out = ($self->msg('ok')) unless @out; -return (1, @out); +return (1, USDB::init());