doc.kak: Fix post list syntax refactoring
This commit is contained in:
parent
8b2e5ea862
commit
a6ba65c121
|
@ -12,9 +12,11 @@ define-command -hidden -params 4 doc-render-regex %{
|
||||||
execute-keys -draft s %arg{2} <ret> d
|
execute-keys -draft s %arg{2} <ret> d
|
||||||
execute-keys "%arg{3}"
|
execute-keys "%arg{3}"
|
||||||
evaluate-commands %sh{
|
evaluate-commands %sh{
|
||||||
ranges=$(echo "$kak_selections_desc" | sed -e "s/:/|$4:/g; s/\$/|$4/")
|
face="$4"
|
||||||
|
eval "set -- $kak_selections_desc"
|
||||||
|
for desc in "$@"; do ranges="$ranges '$desc|$face'"; done
|
||||||
echo "update-option buffer doc_render_ranges"
|
echo "update-option buffer doc_render_ranges"
|
||||||
echo "set-option -add buffer doc_render_ranges '$ranges'"
|
echo "set-option -add buffer doc_render_ranges $ranges"
|
||||||
}
|
}
|
||||||
} }
|
} }
|
||||||
}
|
}
|
||||||
|
@ -39,7 +41,7 @@ define-command -hidden doc-parse-anchors %{
|
||||||
# Find sections as add them as imlicit anchors
|
# Find sections as add them as imlicit anchors
|
||||||
execute-keys \%s ^={2,}\h+([^\n]+)$ <ret>
|
execute-keys \%s ^={2,}\h+([^\n]+)$ <ret>
|
||||||
evaluate-commands -itersel %{
|
evaluate-commands -itersel %{
|
||||||
set-option -add buffer doc_anchors "%val{selection_desc}|%sh{printf '%s' \"$kak_reg_1\" | tr '[A-Z ]' '[a-z-]'}"
|
set-option -add buffer doc_anchors "%val{selection_desc}|%sh{printf '%s' ""$kak_reg_1"" | tr '[A-Z ]' '[a-z-]'}"
|
||||||
}
|
}
|
||||||
|
|
||||||
# Parse explicit anchors and remove their text
|
# Parse explicit anchors and remove their text
|
||||||
|
@ -55,19 +57,25 @@ define-command -hidden doc-parse-anchors %{
|
||||||
define-command doc-jump-to-anchor -params 1 %{
|
define-command doc-jump-to-anchor -params 1 %{
|
||||||
update-option buffer doc_anchors
|
update-option buffer doc_anchors
|
||||||
evaluate-commands %sh{
|
evaluate-commands %sh{
|
||||||
range=$(printf "%s" "$kak_opt_doc_anchors" | tr ':' '\n' | grep "$1" | head -n1)
|
anchor="$1"
|
||||||
if [ -n "$range" ]; then
|
eval "set -- $kak_opt_doc_anchors"
|
||||||
|
for range in "$@"; do
|
||||||
|
if [ "${range#*|}" == "$anchor" ]; then
|
||||||
printf '%s\n' "select '${range%|*}'; execute-keys vv"
|
printf '%s\n' "select '${range%|*}'; execute-keys vv"
|
||||||
else
|
exit
|
||||||
printf '%s\n' "echo -markup %{{Error}No such anchor '$1'}"
|
|
||||||
fi
|
fi
|
||||||
|
done
|
||||||
|
printf '%s\n' "echo -markup %{{Error}No such anchor '$1'}"
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
define-command doc-follow-link %{
|
define-command doc-follow-link %{
|
||||||
update-option buffer doc_links
|
update-option buffer doc_links
|
||||||
evaluate-commands %sh{
|
evaluate-commands %sh{
|
||||||
printf "%s" "$kak_opt_doc_links" | awk -v RS=':' -v FS='[.,|#]' '
|
eval "set -- $kak_opt_doc_links"
|
||||||
|
for link in "$@"; do
|
||||||
|
printf '%s\n' "$link"
|
||||||
|
done | awk -v FS='[.,|#]' '
|
||||||
BEGIN {
|
BEGIN {
|
||||||
l=ENVIRON["kak_cursor_line"];
|
l=ENVIRON["kak_cursor_line"];
|
||||||
c=ENVIRON["kak_cursor_column"];
|
c=ENVIRON["kak_cursor_column"];
|
||||||
|
|
Loading…
Reference in New Issue
Block a user