summaryrefslogtreecommitdiffstats
path: root/kate/data/perl.xml
diff options
context:
space:
mode:
authortpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2010-01-02 09:20:27 +0000
committertpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2010-01-02 09:20:27 +0000
commitd7b9791584eda0f022813fd2b2df50f59eba29c5 (patch)
tree395d2d48909ce6f9e002106d1638610f7a7c8321 /kate/data/perl.xml
parent84bbc54a086fc6894b247488bf62bdff04dd55fa (diff)
downloadtdelibs-d7b9791584eda0f022813fd2b2df50f59eba29c5.tar.gz
tdelibs-d7b9791584eda0f022813fd2b2df50f59eba29c5.zip
Added remaining missing Kate xml files
git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdelibs@1068844 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'kate/data/perl.xml')
-rw-r--r--kate/data/perl.xml12
1 files changed, 9 insertions, 3 deletions
diff --git a/kate/data/perl.xml b/kate/data/perl.xml
index 15212c376..0b7250457 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.20" 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.23" 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>
@@ -114,6 +114,11 @@
<item> not </item>
<item> eq </item>
<item> ne </item>
+ <item> lt </item>
+ <item> gt </item>
+ <item> le </item>
+ <item> ge </item>
+ <item> cmp </item>
</list>
<list name="functions">
<item>abs</item>
@@ -363,7 +368,7 @@
<RegExpr attribute="Normal Text" context="#stay" String="\w+[=]" />
<RegExpr attribute="Operator" context="find_quoted" String="\bq(?=[qwx]?\s*[^\w\s])" />
- <RegExpr attribute="Operator" context="find_subst" String="\bs(?=\s*[^\w\s])" />
+ <RegExpr attribute="Operator" context="find_subst" String="\bs(?=\s*[^\w\s\]})])" />
<RegExpr attribute="Operator" context="tr" String="\b(?:tr|y)\s*(?=[^\w\s\]})])" />
<RegExpr attribute="Operator" context="find_pattern" String="\b(?:m|qr)(?=\s*[^\w\s\]})])" />
@@ -547,8 +552,9 @@
<IncludeRules context="regex_pattern_internal_ip" />
</context>
<context name="subst_slash_replace" attribute="String (interpolated)" lineEndContext="#stay" dynamic="true">
- <IncludeRules context="ipstring_internal" />
<RegExpr attribute="Operator" context="#pop#pop#pop" String="%1[cegimosx]*" dynamic="true" endRegion="Replacement" />
+ <IncludeRules context="ipstring_internal" />
+
</context>
<context name="subst_sq_pattern" attribute="Pattern" lineEndContext="#stay">