CVS: setedit/cfgfiles perlmac.pmc,1.3,1.4 syntaxhl.shl,1.99,1.100

[Salvador E. T. <se...@us...>]

Update of /cvsroot/setedit/setedit/cfgfiles
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv13755

Modified Files:
	perlmac.pmc syntaxhl.shl 
Log Message:
* Added: Syntax highlight and indentation for Perl's switch/case module.


Index: perlmac.pmc
===================================================================
RCS file: /cvsroot/setedit/setedit/cfgfiles/perlmac.pmc,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** perlmac.pmc	5 May 2003 13:57:50 -0000	1.3
--- perlmac.pmc	24 Apr 2015 13:41:54 -0000	1.4
***************
*** 1,3 ****
! ; Copyright (C) 1996-2003 by Salvador E. Tropea (SET),
  ; see copyrigh file for details
  ;
--- 1,3 ----
! ; Copyright (C) 1996-2015 by Salvador E. Tropea (SET),
  ; see copyrigh file for details
  ;
***************
*** 58,61 ****
--- 58,84 ----
     "}"
  
+ Trigger: "s("
+ Mode: 0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1
+ Name: Switch
+  "switch (@0)\n"
+  "  {\n"
+    " case @1\n"
+     "  {\n"
+       " @2\n"
+       "}\n"
+     "\belse\n"
+     "  {\n"
+       " @3\n"
+       "}\n"
+    "\b\b}"
+ 
+ Trigger: "c:"
+ Mode: 0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1
+ Name: Case
+  "case @0\n"
+  "  {\n"
+    " @1\n"
+    "}"
+ 
  Trigger: "pr"
  Mode: 0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1

Index: syntaxhl.shl
===================================================================
RCS file: /cvsroot/setedit/setedit/cfgfiles/syntaxhl.shl,v
retrieving revision 1.99
retrieving revision 1.100
diff -C2 -d -r1.99 -r1.100
*** syntaxhl.shl	23 May 2012 18:55:36 -0000	1.99
--- syntaxhl.shl	24 Apr 2015 13:41:55 -0000	1.100
***************
*** 1,3 ****
! # Copyright (C) 1996-2007 by Salvador E. Tropea (SET),
  # see copyrigh file for details
  #
--- 1,3 ----
! # Copyright (C) 1996-2015 by Salvador E. Tropea (SET),
  # see copyrigh file for details
  #
***************
*** 560,563 ****
--- 560,565 ----
  NLIndent=FirstWord,elsif,,,AutoIndent,2
  NLIndent=FirstWord,while,NoLastChar,;,AutoIndent,2
+ NLIndent=FirstWord,switch,NoLastChar,;,AutoIndent,2
+ NLIndent=FirstWord,case,NoLastChar,;,AutoIndent,2
  NLIndent=FirstWord,return,,,Unindent
  NLIndent=FirstWord,{,,,AutoIndent,1
***************
*** 591,594 ****
--- 593,597 ----
  Keywords=unlink,unpack,unshift,untie,until,use,utime,values,vec,wait,waitpid
  Keywords=wantarray,warn,while,write,x,xor,y
+ UserKeywords=switch,case
  End