change type of user from 'A' to 'S'

diff --git a/perl/create_sysop.pl b/perl/create_sysop.pl
index d600ec6ee623515082fc2f113062882d534d3e85..246de92d1a39fd9ee4df8d999ff9cc7a247feb07 100755 (executable)
--- a/perl/create_sysop.pl
+++ b/perl/create_sysop.pl
@@ -41,7 +41,7 @@ sub create_it
        $self->{email} = $myemail;
        $self->{bbsaddr} = $mybbsaddr;
        $self->{homenode} = $mycall;
-       $self->{sort} = 'A';            # C - Console user, S - Spider cluster, A - AK1A, U - User, B - BBS
+       $self->{sort} = 'S';            # C - Console user, S - Spider cluster, A - AK1A, U - User, B - BBS
        $self->{priv} = 9;                      # 0 - 9 - with 9 being the highest
        $self->{lastin} = 0;
        $self->{dxok} = 1;