From 694abaa12e3592e961f2a128e4335a6de009b6db Mon Sep 17 00:00:00 2001
From: "Brian T. Rice" <briantrice@gmail.com>
Date: Sat, 5 Dec 2009 10:20:20 -0800
Subject: [PATCH] Fixed the Emacs mode treatment of commas for the new syntax.

---
 etc/slate-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/etc/slate-mode.el b/etc/slate-mode.el
index 66d0746..f6cda65 100644
--- a/etc/slate-mode.el
+++ b/etc/slate-mode.el
@@ -148,7 +148,7 @@
   (regexp-opt '("lobby" "True" "False" "Nil" "NoRole" "thisContext"
         "resend" "clone" "here" "it") 'words))
 
-(defconst slate-binop-regexp (concat "\\([-+*/~,;<>=&?]\\{1,3\\}\\|||\\)" slate-name-regexp "\\([-+*/~,;<>=&?]\\{1,3\\}\\|||\\)")
+(defconst slate-binop-regexp (concat "\\([-+*/~;<>=&?]\\{1,3\\}\\|||\\)" slate-name-regexp "\\([-+*/~,;<>=&?]\\{1,3\\}\\|||\\)")
   "A regular expression that matches a Slate binary selector")
 
 (defconst slate-keyword-regexp
@@ -179,7 +179,6 @@
        (?~  . "w")
        (?%  . "w")
        (?\; . "w")
-       (?,  . "w")
        (?<  . "w")
        (?>  . "w")
        (?\[ . "(]") ; Block opener
@@ -199,6 +198,7 @@
        (?!  . "'") ; A stop in Smalltalk. A type annotation in Slate.
        (?@  . "'") ; Dispatch annotator
        (?^  . "w") ; Return
+       (?,  . ".") ; Comma for *rest parameters
        (?.  . "."))) ; Statement separator
     table)
   "Slate character types")
-- 
2.11.4.GIT