diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Reply.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Reply.pm b/lib/Reply.pm index be79ab8..46e1514 100644 --- a/lib/Reply.pm +++ b/lib/Reply.pm @@ -105,6 +105,10 @@ sub _read { my $prompt = $self->_wrapped_plugin('prompt'); my ($line) = $self->_wrapped_plugin('read_line', $prompt); + if (defined($line) && $line =~ s/^#(\w+)(?:\s+|$)//) { + ($line) = $self->_chained_plugin("command_\L$1", $line); + } + return $line; } |