projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
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;
{
my $ref;
- while ($ref = DXUser
->
get(uc $mycall)) {
+ while ($ref = DXUser
::
get(uc $mycall)) {
print "old call $mycall deleted\n";
$ref->del();
}
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
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();
}
print "old call $myalias deleted\n";
$ref->del();
}