v3.25 release
[perl/plp/.git] / plp.vim
diff --git a/plp.vim b/plp.vim
index 9605a677a46bb1f693ea26bb416e94a187b8c44b..adcddea257576550e67902f6776f5334b93c3c10 100644 (file)
--- a/plp.vim
+++ b/plp.vim
@@ -1,18 +1,15 @@
 " Vim syntax file
 " Language:    PLP (Perl in HTML)
 " Maintainer:  Shiar <perl@shiar.org>
 " Vim syntax file
 " Language:    PLP (Perl in HTML)
 " Maintainer:  Shiar <perl@shiar.org>
-" Last Change: 2009 October 19
+" Last Change: 2011 June 17
 " Cloned From: aspperl.vim
 " Author:      Juerd <juerd@juerd.nl>
 
 " Add to filetype.vim the following line (without quote sign):
 " au BufNewFile,BufRead *.plp setf plp
 
 " Cloned From: aspperl.vim
 " Author:      Juerd <juerd@juerd.nl>
 
 " Add to filetype.vim the following line (without quote sign):
 " au BufNewFile,BufRead *.plp setf plp
 
-" For version 5.x: Clear all syntax items
-" For version 6.x: Quit when a syntax file was already loaded
-if version < 600
-  syntax clear
-elseif exists("b:current_syntax")
+" Quit when a syntax file was already loaded
+if exists("b:current_syntax")
   finish
 endif
 
   finish
 endif
 
@@ -20,14 +17,9 @@ if !exists("main_syntax")
   let main_syntax = 'perlscript'
 endif
 
   let main_syntax = 'perlscript'
 endif
 
-if version < 600
-  so <sfile>:p:h/html.vim
-  syn include @PLPperl <sfile>:p:h/perl.vim
-else
-  runtime! syntax/html.vim
-  unlet b:current_syntax
-  syn include @PLPperl syntax/perl.vim
-endif
+runtime! syntax/html.vim
+unlet b:current_syntax
+syn include @PLPperl syntax/perl.vim
 
 syn cluster htmlPreproc add=PLPperlblock
 
 
 syn cluster htmlPreproc add=PLPperlblock
 
@@ -36,9 +28,9 @@ syn keyword perlStatementInclude include Include
 syn keyword perlStatementFiles ReadFile WriteFile Counter
 syn keyword perlStatementScalar EscapeHTML Entity AutoURL DecodeURI EncodeURI
 
 syn keyword perlStatementFiles ReadFile WriteFile Counter
 syn keyword perlStatementScalar EscapeHTML Entity AutoURL DecodeURI EncodeURI
 
-syn cluster PLPperlcode contains=perlStatement.*,perlFunction,perlOperator,perlVarPlain,perlVarNotInMatches,perlShellCommand,perlFloat,perlNumber,perlStringUnexpanded,perlString,perlQQ,perlControl,perlConditional,perlRepeat,perlComment,perlPOD,perlHereDoc,perlPackageDecl,perlElseIfError,perlFiledescRead,perlMatch
+syn cluster PLPperlcode contains=perlStatement.*,perlFunction,perlOperator,perlVarPlain,perlVarNotInMatches,perlShellCommand,perlFloat,perlNumber,perlStringUnexpanded,perlString,perlQQ,perlControl,perlConditional,perlRepeat,perlComment,perlPOD,perlHereDoc,perlPackageDecl,perlFiledescRead,perlMatch
   
   
-syn region  PLPperlblock keepend matchgroup=Delimiter start=+<:=\=+ end=+:>+ transparent contains=@PLPperlcode
+syn region  PLPperlblock keepend matchgroup=Delimiter start=+<:=\=+ end=+:>+ contains=@PLPperlcode
 
 syn region  PLPinclude keepend matchgroup=Delimiter start=+<(+ end=+)>+
 
 
 syn region  PLPinclude keepend matchgroup=Delimiter start=+<(+ end=+)>+