add module dtach-repl
This commit is contained in:
parent
c643cd4467
commit
0d74268451
38
rc/windowing/repl/dtach.kak
Normal file
38
rc/windowing/repl/dtach.kak
Normal file
|
@ -0,0 +1,38 @@
|
||||||
|
provide-module dtach-repl %{
|
||||||
|
|
||||||
|
# test if dtach is installed
|
||||||
|
evaluate-commands %sh{
|
||||||
|
[ -n "$(command -v dtach)" ] || echo 'fail dtach not found'
|
||||||
|
}
|
||||||
|
|
||||||
|
declare-option -docstring "id of the REPL" str dtach_repl_id
|
||||||
|
|
||||||
|
define-command -docstring %{
|
||||||
|
dtach-repl [<arguments>]: create a new terminal window for repl interaction
|
||||||
|
All optional parameters are forwarded to the new terminal window
|
||||||
|
} \
|
||||||
|
-params .. \
|
||||||
|
-shell-completion \
|
||||||
|
dtach-repl %{ terminal sh -c %{
|
||||||
|
file="$(mktemp -u -t kak_dtach_repl.XXXXX)"
|
||||||
|
trap 'rm -f "${file}"' EXIT
|
||||||
|
printf "evaluate-commands -try-client $1 \
|
||||||
|
'set-option current dtach_repl_id ${file}'" | kak -p "$2"
|
||||||
|
shift 2
|
||||||
|
dtach -c "${file}" -E sh -c "${@:-$SHELL}" || "${@:-$SHELL}"
|
||||||
|
} -- %val{client} %val{session} %arg{@}
|
||||||
|
}
|
||||||
|
|
||||||
|
define-command dtach-send-text -params 0..1 -docstring %{
|
||||||
|
dtach-send-text [text]: Send text to the REPL.
|
||||||
|
If no text is passed, then the selection is used
|
||||||
|
} %{
|
||||||
|
nop %sh{
|
||||||
|
printf "%s" "${@:-$kak_selection}" | dtach -p "$kak_opt_dtach_repl_id"
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
alias global repl-new dtach-repl
|
||||||
|
alias global repl-send-text dtach-send-text
|
||||||
|
|
||||||
|
}
|
Loading…
Reference in New Issue
Block a user