make auto-(indenting/insertion) more robust

rc/ruby.kak

@@ -62,33 +62,40 @@ addhl -group /ruby/code regex \<(alias|and|begin|break|case|class|def|defined|do
 # ‾‾‾‾‾‾‾‾
 
 def -hidden _ruby_filter_around_selections %{
+    eval -draft -itersel %{
+        exec <a-x>
         # remove trailing white spaces
-    try %{ exec -draft -itersel <a-x> s \h+$ <ret> d }
+        try %{ exec -draft s \h + $ <ret> d }
+    }
 }
 
-def -hidden _ruby_indent_on_char %<
+def -hidden _ruby_indent_on_char %{
-    eval -draft -itersel %<
+    eval -draft -itersel %{
-        # deindent on (else|elsif|end|rescue|when) keyword insertion
+        # align middle and end structures to start
-        try %{ exec -draft <space> <a-i>w <a-k> (else|elsif|end|rescue|when) <ret> <a-lt> }
+        try %{ exec -draft <a-x> <a-k> ^ \h * (else|elsif) $ <ret> <a-\;> <a-?> ^ \h * (if)                                                       <ret> s \A | \Z <ret> \' <a-&> }
-        # align closer token to its opener when alone on a line
+        try %{ exec -draft <a-x> <a-k> ^ \h * (when)       $ <ret> <a-\;> <a-?> ^ \h * (case)                                                     <ret> s \A | \Z <ret> \' <a-&> }
-        try %< exec -draft <a-h> <a-k> ^\h+[]}]$ <ret> m s \`|.\' <ret> 1<a-&> >
+        try %{ exec -draft <a-x> <a-k> ^ \h * (rescue)     $ <ret> <a-\;> <a-?> ^ \h * (begin)                                                    <ret> s \A | \Z <ret> \' <a-&> }
-    >
+        try %{ exec -draft <a-x> <a-k> ^ \h * (end)        $ <ret> <a-\;> <a-?> ^ \h * (begin|case|class|def|do|for|if|module|unless|until|while) <ret> s \A | \Z <ret> \' <a-&> }
->
+    }
+}
 
-def -hidden _ruby_indent_on_new_line %(
+def -hidden _ruby_indent_on_new_line %{
-    eval -draft -itersel %(
+    eval -draft -itersel %{
         # preserve previous line indent
-        try %{ exec -draft <space> K <a-&> }
+        try %{ exec -draft K <a-&> }
         # filter previous line
         try %{ exec -draft k : _ruby_filter_around_selections <ret> }
         # copy _#_ comment prefix and following white spaces
-        try %{ exec -draft k x s ^\h*\K#\h* <ret> y j p }
+        try %{ exec -draft k x s ^ \h * \K \# \h * <ret> y j p }
-        # indent after (else|elsif|rescue|when) keywords and lines beginning / ending with opener token
+        # indent after start structure
-        try %( exec -draft <space> k x <a-k> (else|elsif|rescue|when)|^\h*[[{]|[[{]$ <ret> j <a-gt> )
+        try %{ exec -draft k x <a-k> ^ \h * (begin|case|class|def|do|else|elsif|ensure|for|if|module|rescue|unless|until|when|while) \b <ret> j <a-gt> }
-        # indent after (begin|case|class|def|do|if|loop|module|unless|until|while) keywords and add _end_ keyword
+        # wisely add end structure
-        try %{ exec -draft <space> k x <a-k> (begin|case|class|def|do|(?<!els)if|loop|module|unless|until|while) <ret> x y p j a end <esc> k <a-gt> }
+        eval -save-regs x %{
-    )
+            try %{ exec -draft k x s ^ \h + <ret> \" x y } catch %{ reg x '' }
-)
+            try %{ exec -draft k x <a-k> ^ <c-r> x (begin|case|class|def|do|for|if|module|unless|until|while) <ret> j <a-a> i X <a-\;> K <a-K> ^ <c-r> x (for|function|if|while) . * \n <c-r> x end $ <ret> j x y p j a end <esc> <a-lt> }
+        }
+    }
+}
 
 # Initialization
 # ‾‾‾‾‾‾‾‾‾‾‾‾‾‾