diff options
| author | John Isom <John.Isom2001@gmail.com> | 2020-07-28 20:51:19 -0600 |
|---|---|---|
| committer | John Isom <John.Isom2001@gmail.com> | 2020-07-29 08:54:19 -0600 |
| commit | 623743e794a03c76c515e5ad75d7cf16a67b034b (patch) | |
| tree | 9527a06bd135ab587890c3722fb73a1060f45c92 /rc/filetype/perl.kak | |
| parent | 655c7aad6084b470ef72b045f6d228f143ac1dd8 (diff) | |
Update deindenting in perl.kak
Diffstat (limited to 'rc/filetype/perl.kak')
| -rw-r--r-- | rc/filetype/perl.kak | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rc/filetype/perl.kak b/rc/filetype/perl.kak index aacab43f..8ca94c1f 100644 --- a/rc/filetype/perl.kak +++ b/rc/filetype/perl.kak @@ -118,7 +118,7 @@ define-command -hidden perl-indent-on-new-line %~ # indent after if|else|while|for try %[ execute-keys -draft <semicolon><a-F>)MB <a-k> \A(if|else|while|for)\h*\(.*\)\h*\n\h*\n?\z <ret> s \A|.\z <ret> 1<a-&>1<a-space><a-gt> ] # deindent closing brace(s) when after cursor - try %[ execute-keys -draft <a-x> <a-k>^\h*[})]+\h*(?://.*)?$<ret> <a-/> [})] <ret> m <a-S> 1<a-&> ] + try %[ execute-keys -draft <a-x> <a-k>^\h*[})]+\h*(?:#.*)?$<ret> \; <a-/> [})] <ret> m <a-S> 1<a-&> ] = ~ |