el/dot-emacs.el: Lay out Python keywords to allow additions.

[profile] / el / dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index a04ac26..48819b4 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -2396,8 +2396,8 @@ indentation anyway."
       (let ((key (car item)) (value (cdr item)))
        (if (let* ((key-name (symbol-name key))
                   (key-len (length key-name)))
-             (and (>= key-len 5)
-                  (string= (subseq key-name (- key-len 5)) "-alist")))
+             (and (>= key-len 6)
+                  (string= (subseq key-name (- key-len 6)) "-alist")))
            (push (cons key
                        (mdw-merge-style-alists value
                                                (cdr (assoc key second))))
@@ -3280,7 +3280,7 @@ name, as a symbol."
             ;; And anything else is punctuation.
             (list "\\(\\s.\\|\\s(\\|\\s)\\|\\s\\\\|\\s/\\)"
                   '(0 mdw-punct-face)))
-           font-lock-syntactic-face-function . nil))
+           font-lock-syntactic-face-function nil))
 
   ;; Hack key bindings.
   (local-set-key [?{] 'mdw-self-insert-and-indent)
@@ -3470,11 +3470,22 @@ strip numbers instead."
 
 (defun mdw-fontify-python ()
   (mdw-fontify-pythonic
-   (mdw-regexps "and" "as" "assert" "break" "class" "continue" "def"
-               "del" "elif" "else" "except" "exec" "finally" "for"
-               "from" "global" "if" "import" "in" "is" "lambda"
-               "not" "or" "pass" "print" "raise" "return" "try"
-               "while" "with" "yield")))
+   (mdw-regexps "and" "as" "assert"
+               "break"
+               "class" "continue"
+               "def" "del"
+               "elif" "else" "except" "exec"
+               "finally" "for" "from"
+               "global"
+               "if" "import" "in" "is"
+               "lambda"
+               "not"
+               "or"
+               "pass" "print"
+               "raise" "return"
+               "try"
+               "while" "with"
+               "yield")))
 
 (defun mdw-fontify-pyrex ()
   (mdw-fontify-pythonic