home/rc/windowing/repl/tmux.kak
Frank LENORMAND 87f9be6723 rc repl: Normalise REPL commands
It's unclear what the `send-text` alias does at first glance,
so prefixing it with "repl-" both fixes that and helps make it
discoverable via the command prompt's fuzzy matcher.

The `repl` alias also seems too generic a name, the "-new" suffix
should hopefully give a hint that it creates a new window.
2020-09-01 13:34:52 +03:00

56 lines
1.8 KiB
Plaintext

# http://tmux.github.io/
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾
# Tmux version >= 2 is required to use this module
hook global ModuleLoaded tmux %{
require-module tmux-repl
}
provide-module tmux-repl %{
declare-option -docstring "tmux pane id in which the REPL is running" str tmux_repl_id
define-command -hidden -params 1.. tmux-repl-impl %{
evaluate-commands %sh{
if [ -z "$TMUX" ]; then
echo 'fail This command is only available in a tmux session'
exit
fi
tmux_args="$1"
shift
tmux $tmux_args "$@"
printf "set-option global tmux_repl_id '%s'" $(tmux display-message -p '#{session_id}:#{window_id}.#{pane_id}')
}
}
define-command tmux-repl-vertical -params 0.. -command-completion -docstring "Create a new vertical pane for repl interaction" %{
tmux-repl-impl 'split-window -v' %arg{@}
}
define-command tmux-repl-horizontal -params 0.. -command-completion -docstring "Create a new horizontal pane for repl interaction" %{
tmux-repl-impl 'split-window -h' %arg{@}
}
define-command tmux-repl-window -params 0.. -command-completion -docstring "Create a new window for repl interaction" %{
tmux-repl-impl 'new-window' %arg{@}
}
define-command -hidden tmux-send-text -params 0..1 -docstring %{
tmux-send-text [text]: Send text(append new line) to the REPL pane.
If no text is passed, then the selection is used
} %{
nop %sh{
if [ $# -eq 0 ]; then
tmux set-buffer -b kak_selection "${kak_selection}"
else
tmux set-buffer -b kak_selection "$1"
fi
tmux paste-buffer -b kak_selection -t "$kak_opt_tmux_repl_id"
}
}
alias global repl-new tmux-repl-horizontal
alias global repl-send-text tmux-send-text
}