Add missing block to Term::Shell fix
(This corresponds to Term::Shell PR posted at
https://github.com/shlomif/Term-Shell/pull/3)
--- a/shelldap Tue Apr 30 01:10:00 2019 +0200
+++ b/shelldap Tue Apr 30 12:07:28 2019 +0200
@@ -541,6 +541,13 @@
next unless $hnd =~ /^(run|help|smry|comp|catch|alias)_/o;
my $t = $1;
my $a = substr( $hnd, length($t) + 1 );
+
+ # Add on the prefix and suffix if the command is defined
+ if ( length $a )
+ {
+ substr( $a, 0, 0 ) = $o->cmd_prefix;
+ $a .= $o->cmd_suffix;
+ }
if ( $o->has_aliases($a) )
{