Perl files are not always executable
This commit is contained in:
parent
7f49395cf9
commit
a362c8a145
|
@ -54,7 +54,7 @@ define-command patch -params .. -docstring %{
|
||||||
# a shell where it expands to nothing.
|
# a shell where it expands to nothing.
|
||||||
eval set -- $kak_quoted_reg_a
|
eval set -- $kak_quoted_reg_a
|
||||||
|
|
||||||
"${kak_reg_f%/*}/patch-range.pl" $min_line $max_line "$@" ||
|
perl "${kak_reg_f%/*}/patch-range.pl" $min_line $max_line "$@" ||
|
||||||
echo >$kak_command_fifo "set-register e fail 'patch: failed to apply selections, see *debug* buffer'"
|
echo >$kak_command_fifo "set-register e fail 'patch: failed to apply selections, see *debug* buffer'"
|
||||||
}
|
}
|
||||||
execute-keys |<ret>
|
execute-keys |<ret>
|
||||||
|
|
Loading…
Reference in New Issue
Block a user