diff options
Diffstat (limited to 'kate/data/perl.xml')
-rw-r--r-- | kate/data/perl.xml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/kate/data/perl.xml b/kate/data/perl.xml index 33bef8337..ebc78987b 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.29-1" kateversion="2.4" section="Scripts" extensions="*.pl;*.PL;*.pm" mimetype="application/x-perl;text/x-perl" priority="5" author="Anders Lund (anders@alweb.dk)" license="LGPL"> +<language name="Perl" version="1.29-2" kateversion="2.4" section="Scripts" extensions="*.pl;*.PL;*.pm" mimetype="application/x-perl;text/x-perl" priority="5" author="Anders Lund (anders@alweb.dk)" license="LGPL"> <highlighting> <list name="keywords"> <item> if </item> @@ -745,7 +745,7 @@ </context> <context name="here_document" attribute="String (interpolated)" lineEndContext="#stay" dynamic="true"> <DetectSpaces /> - <RegExpr attribute="Keyword" context="#pop#pop" String="%1" column="0" dynamic="true" endRegion="HereDocument"/> + <RegExpr attribute="Keyword" context="#pop#pop" String="^%1\b" column="0" dynamic="true" endRegion="HereDocument"/> <RegExpr attribute="Keyword" context="here_document" String="\=\s*<<\s*["']?([A-Z0-9_\-]+)["']?" beginRegion="HEREDoc" /> <IncludeRules context="ipstring_internal" /> </context> |