diff options
Diffstat (limited to 'kate/data/perl.xml')
| -rw-r--r-- | kate/data/perl.xml | 21 |
1 files changed, 12 insertions, 9 deletions
diff --git a/kate/data/perl.xml b/kate/data/perl.xml index 0b7250457..71b04ad9f 100644 --- a/kate/data/perl.xml +++ b/kate/data/perl.xml @@ -39,7 +39,7 @@ Enhance tr/// and y/// support. --> -<language name="Perl" version="1.23" kateversion="2.4" section="Scripts" extensions="*.pl;*.pm" mimetype="application/x-perl;text/x-perl" author="Anders Lund (anders@alweb.dk)" license="LGPL"> +<language name="Perl" version="1.25" kateversion="2.4" section="Scripts" extensions="*.pl;*.pm" mimetype="application/x-perl;text/x-perl" author="Anders Lund (anders@alweb.dk)" license="LGPL"> <highlighting> <list name="keywords"> <item> if </item> @@ -85,6 +85,7 @@ <item> **= </item> <item> |= </item> <item> ||= </item> + <item> //= </item> <item> &= </item> <item> &&= </item> <item> ?= </item> @@ -94,6 +95,7 @@ <!-- <item> / </item>//--> <item> % </item> <item> || </item> + <item> // </item> <item> && </item> <item> | </item> <item> & </item> @@ -362,8 +364,9 @@ <RegExpr attribute="Operator" context="find_here_document" String="\s*<<(?=\w+|\s*["'])" beginRegion="HereDocument" /> - <RegExpr attribute="Normal Text" context="#stay" String="\s*\}\s*/" endRegion="Block"/> - <RegExpr attribute="Normal Text" context="#stay" String="\s*[)]\s*/" /> + <RegExpr attribute="Normal Text" context="#stay" String="\s*\}\s*/{1,2}" endRegion="Block"/> + <RegExpr attribute="Normal Text" context="#stay" String="\s*[)\]]\s*/{1,2}" /> + <RegExpr attribute="Function" context="sub_name_def" String="\w+::" /> <RegExpr attribute="Normal Text" context="#stay" String="\w+[=]" /> @@ -661,7 +664,7 @@ <RegExpr attribute="Data Type" context="var_detect" String="\$\$[\$\w_]" /> <RegExpr attribute="Data Type" context="var_detect" String="\$[#_][\w_]" /> <RegExpr attribute="Data Type" context="var_detect" String="\$+::" /> - <RegExpr attribute="Special Variable" context="#stay" String="\$[^a-zA-Z0-9\s{][A-Z]?" /> + <RegExpr attribute="Special Variable" context="var_detect" String="\$[^a-zA-Z0-9\s{][A-Z]?" /> <RegExpr attribute="Data Type" context="var_detect" String="[\$@%]\{[\w_]+\}" /> <AnyChar attribute="Data Type" context="var_detect" String="$@%" /> <RegExpr attribute="Data Type" context="var_detect" String="\*[a-zA-Z_]+" /> @@ -679,7 +682,7 @@ <RegExpr attribute="Data Type" context="var_detect_unsafe" String="\$+::" /> <RegExpr attribute="Special Variable" context="#stay" String="\$[^a-zA-Z0-9\s{][A-Z]?" /> <RegExpr attribute="Data Type" context="var_detect_unsafe" String="[\$@%]\{[\w_]+\}" /> - <RegExpr attribute="Data Type" context="var_detect_unsafe" String="[\$@%]" /> + <RegExpr attribute="Data Type" context="var_detect_unsafe" String="[\$@%]" /><!-- AnyChar! --> <RegExpr attribute="Data Type" context="var_detect_unsafe" String="\*\w+" /> <AnyChar attribute="Operator" context="#pop" String="$@%*" /> </context> @@ -762,10 +765,10 @@ </context> <context name="slash_safe_escape" attribute="Normal Text" lineEndContext="#pop" fallthrough="true" fallthroughContext="#pop"> - <RegExpr attribute="Normal Text" context="#pop" String="\s*\]?\s*/" /> - <RegExpr attribute="Normal Text" context="#pop" String="\s*\}?\s*/" endRegion="Block" /> - <RegExpr attribute="Normal Text" context="#pop" String="\s*\)?\s*/" /> - <keyword attribute="Keyword" context="#pop" String="keywords" /> + <DetectSpaces /> + <RegExpr attribute="Normal Text" context="#pop" String="\}\s*/{1,2}" endRegion="Block"/> + <RegExpr attribute="Normal Text" context="#pop" String="[)\]]?\s*/{1,2}" /> + <keyword attribute="Keyword" context="#pop" String="keywords" /><!-- wonder why??? --> </context> <context name="package_qualified_blank" attribute="Normal Text" lineEndContext="#stay"> |