mirror of
https://github.com/mawww/kakoune.git
synced 2024-11-25 10:32:19 +03:00
Simplify the highlighted regions, fix the ones remaining
This commit is contained in:
parent
7581cde87a
commit
753e3d17de
11
rc/perl.kak
11
rc/perl.kak
@ -16,13 +16,10 @@ hook global BufCreate .*\.pl %{
|
||||
# ‾‾‾‾‾‾‾‾‾‾‾‾
|
||||
|
||||
addhl -group / regions -default code perl \
|
||||
command '(?:[^\$]|^)`' '`' '' \
|
||||
command '\<qx/' (?<!\\)(\\\\)*/ '' \
|
||||
double_string '(?:[^\$]|^)"' (?<!\\)(\\\\)*" '' \
|
||||
double_string '\<q(q|w)/' (?<!\\)(\\\\)*/ '' \
|
||||
single_string "(?:[^\$]|^)'" (?<!\\)(\\\\)*' '' \
|
||||
single_string "\<q/" (?<!\\)(\\\\)*/ '' \
|
||||
comment '(?:[^\$]|^)#' $ ''
|
||||
command '(?<!\$)`' (?<!\\)(\\\\)*` '' \
|
||||
double_string '(?<!\$)"' (?<!\\)(\\\\)*" '' \
|
||||
single_string "(?<!\$)'" (?<!\\)(\\\\)*' '' \
|
||||
comment '(?<!\$)#' $ ''
|
||||
|
||||
addhl -group /perl/command fill magenta
|
||||
addhl -group /perl/double_string fill string
|
||||
|
Loading…
Reference in New Issue
Block a user