projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
incoming pc39 doesn't cause an outgoing one
[spider.git]
/
perl
/
create_sysop.pl
diff --git
a/perl/create_sysop.pl
b/perl/create_sysop.pl
index 840ddef4da303b324e9ef639781f0a5138c90380..95fc063600d588abccc944741b82b2731291734f 100755
(executable)
--- a/
perl/create_sysop.pl
+++ b/
perl/create_sysop.pl
@@
-80,19
+80,19
@@
if (-e "$userfn") {
$ans = <STDIN>;
if ($ans =~ /^[Yy]/) {
delete_it();
$ans = <STDIN>;
if ($ans =~ /^[Yy]/) {
delete_it();
- DXUser->init($userfn);
+ DXUser->init($userfn
, 1
);
create_it();
} else {
print "Do you wish to reset your cluster and sysop information? [y/N]: ";
$ans = <STDIN>;
if ($ans =~ /^[Yy]/) {
create_it();
} else {
print "Do you wish to reset your cluster and sysop information? [y/N]: ";
$ans = <STDIN>;
if ($ans =~ /^[Yy]/) {
- DXUser->init($userfn);
+ DXUser->init($userfn
, 1
);
create_it();
}
}
} else {
create_it();
}
}
} else {
- DXUser->init($userfn);
+ DXUser->init($userfn
, 1
);
create_it();
}
DXUser->finish();
create_it();
}
DXUser->finish();