X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/060c23ce272d3f9b7bf158cac48c7a1b30ad4515..a63efb6728ba8d0fd07a24235755c1345a9b897c:/el/dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index a96482f..e290e5a 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -1889,6 +1889,10 @@ name, as a symbol."
 	   (list "\\(\\s.\\|\\s(\\|\\s)\\|\\s\\\\|\\s/\\)"
 		 '(0 mdw-punct-face))))))
 
+(define-derived-mode sod-mode c-mode "Sod"
+  "Major mode for editing Sod code.")
+(push '("\\.sod$" . sod-mode) auto-mode-alist)
+
 ;;;--------------------------------------------------------------------------
 ;;; AP calc mode.
 
@@ -2630,10 +2634,10 @@ strip numbers instead."
 (defun mdw-fontify-pyrex ()
   (mdw-fontify-pythonic
    (mdw-regexps "and" "as" "assert" "break" "cdef" "class" "continue"
-		"ctypedef" "def" "del" "elif" "else" "except" "exec"
+		"ctypedef" "def" "del" "elif" "else" "enum" "except" "exec"
 		"extern" "finally" "for" "from" "global" "if"
 		"import" "in" "is" "lambda" "not" "or" "pass" "print"
-		"raise" "return" "struct" "try" "while" "with"
+		"property" "raise" "return" "struct" "try" "while" "with"
 		"yield")))
 
 ;;;--------------------------------------------------------------------------
@@ -3822,6 +3826,8 @@ there is sadness."
 ;;;--------------------------------------------------------------------------
 ;;; MPC configuration.
 
+(eval-when-compile (trap (require 'mpc)))
+
 (setq mpc-browser-tags '(Artist|Composer|Performer Album|Playlist))
 
 (defun mdw-mpc-now-playing ()