Add a spell replace function

2016-10-20 12:31:06 +01:00 · 2016-10-20 12:31:06 +01:00 · 52d1929d81
commit 52d1929d81
parent dcebdd54f3
1 changed files with 11 additions and 0 deletions
--- a/rc/base/spell.kak
+++ b/rc/base/spell.kak
@ -54,3 +54,14 @@ Formats of language supported:
        } </dev/null >/dev/null 2>&1 &
    }
 }
+
+def spell_replace %{%sh{
+    suggestions=$(echo "$kak_selection" | aspell -a | grep '^&' | cut -d: -f2)
+    menu=$(echo "${suggestions#?}" | awk -F', ' '
+    {
+        for (i=1; i<=NF; i++)
+            printf "%s", "%{"$i"}" "%{exec -itersel c"$i"<esc>be}"
+    }
+    ')
+    printf '%s\n' "try %{ menu -auto-single $menu }"
+}}