Redundantly confirm to clients we do not accept posting with the
MODE READER command.
ref: RFC 3977 5.3.1
my ($self, $arg) = @_;
$arg = uc $arg;
return r501 unless $arg eq 'READER';
my ($self, $arg) = @_;
$arg = uc $arg;
return r501 unless $arg eq 'READER';
- '200 reader status acknowledged';
+ '201 Posting prohibited';
}
sub cmd_slave ($) { '202 slave status noted' }
}
sub cmd_slave ($) { '202 slave status noted' }