Merge pull request #6 from txtsd/thefix

Remove leading 'the' in class
This commit is contained in:
John R. Dennison 2021-06-23 19:49:47 -05:00 committed by GitHub
commit 0ddd6fd175
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -150,6 +150,7 @@ if (! -e $opts{dbfile}) {
$uname = length($uname)?$uname:$opts{owner}; $uname = length($uname)?$uname:$opts{owner};
print "Enter a character class for this account: "; print "Enter a character class for this account: ";
chomp(my $uclass = <STDIN>); chomp(my $uclass = <STDIN>);
$uclass =~ s/^the //i;
$rps{$uname}{class} = substr($uclass,0,30); $rps{$uname}{class} = substr($uclass,0,30);
print "Enter a password for this account: "; print "Enter a password for this account: ";
if ($^O ne "MSWin32") { if ($^O ne "MSWin32") {