diff options
author | Russ Allbery <rra@cpan.org> | 2020-12-24 19:52:09 -0800 |
---|---|---|
committer | Russ Allbery <rra@cpan.org> | 2020-12-24 19:52:09 -0800 |
commit | faa4cf3afb16c17bbf0dca00a42b89b0cb12019c (patch) | |
tree | e0d4e1ee3eb2e102b2120765881918221a9f38ee | |
parent | caea1a3604675135095e9f9cbb4269dd1f907a56 (diff) |
Drop code support in App::DocKnot::Command
This is no longer used by any of the subcommands and I don't plan
to use it in the future, so simplify the logic.
-rw-r--r-- | lib/App/DocKnot/Command.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lib/App/DocKnot/Command.pm b/lib/App/DocKnot/Command.pm index 6fde6a9..ac05c0f 100644 --- a/lib/App/DocKnot/Command.pm +++ b/lib/App/DocKnot/Command.pm @@ -208,13 +208,9 @@ sub run { # Dispatch the command and turn exceptions into error messages. eval { - if ($COMMANDS{$command}{code}) { - $COMMANDS{$command}{code}->($opts_ref, $args_ref->@*); - } else { - my $object = $COMMANDS{$command}{module}->new($opts_ref); - my $method = $COMMANDS{$command}{method}; - $object->$method($args_ref->@*); - } + my $object = $COMMANDS{$command}{module}->new($opts_ref); + my $method = $COMMANDS{$command}{method}; + $object->$method($args_ref->@*); }; if ($@) { my $error = $@; |