summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Isom <John.Isom2001@gmail.com>2020-07-28 16:04:35 -0600
committerJohn Isom <John.Isom2001@gmail.com>2020-07-28 16:04:35 -0600
commit3bd783c3371ae26fdb22c8a6189a848482be2dc1 (patch)
treea337dd388acec91b28941d638a58c91f7063aba4
parent8f0b56be1fa1e2bbd94513dedac2d8c81c65bcd6 (diff)
Update deindenting in perl.kak
-rw-r--r--rc/filetype/perl.kak2
1 files changed, 1 insertions, 1 deletions
diff --git a/rc/filetype/perl.kak b/rc/filetype/perl.kak
index e2150a1b..aacab43f 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> hm <a-S> 1<a-&> ]
+ try %[ execute-keys -draft <a-x> <a-k>^\h*[})]+\h*(?://.*)?$<ret> <a-/> [})] <ret> m <a-S> 1<a-&> ]
=
~