Change DXUser->get* to DXUser::get*

[spider.git] / perl / update_sysop.pl

diff --git a/perl/update_sysop.pl b/perl/update_sysop.pl
index cec9f56ec04757c7e32e70f7dbed105d28f26b80..2fccbb5aee90c8aa2f46fa5c5412b933150b187d 100755 (executable)
--- a/perl/update_sysop.pl
+++ b/perl/update_sysop.pl
@@ -29,7 +29,7 @@ sub create_it
 {
        my $ref;
        
-       while ($ref = DXUser->get(uc $mycall)) {
+       while ($ref = DXUser::get(uc $mycall)) {
                print "old call $mycall deleted\n";
                $ref->del();
        }
@@ -55,7 +55,7 @@ sub create_it
        print "new call $mycall added\n";
 
        # now do one for the alias
-       while ($ref = DXUser->get($myalias)) {
+       while ($ref = DXUser::get($myalias)) {
                print "old call $myalias deleted\n";
                $ref->del();
        }