X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/3b7875477b38ca4d913ed682041e44e164cf2edb..4bebeeae49c6da45ffe5930ae1c21d84daa571f5:/dot-emacs.el

diff --git a/dot-emacs.el b/dot-emacs.el
index 8a724ab..7ced779 100644
--- a/dot-emacs.el
+++ b/dot-emacs.el
@@ -1,7 +1,5 @@
 ;;; -*- mode: emacs-lisp; coding: utf-8 -*-
 ;;;
-;;; $Id$
-;;;
 ;;; Functions and macros for .emacs
 ;;;
 ;;; (c) 2004 Mark Wooding
@@ -448,7 +446,10 @@ a list of things:
 (make-variable-buffer-local 'mdw-fill-prefix)
 
 (defvar mdw-hanging-indents
-  "\\(\\(\\([*o]\\|--\\|[0-9]+\\.\\|\\[[0-9]+\\]\\|([a-zA-Z])\\)[ \t]+\\)?\\)"
+  (concat "\\(\\("
+	    "\\([*o]\\|-[-#]?\\|[0-9]+\\.\\|\\[[0-9]+\\]\\|([a-zA-Z])\\)"
+	    "[ \t]+"
+	  "\\)?\\)")
   "*Standard regular expression matching things which might be part of a
 hanging indent.  This is mainly useful in `auto-fill-mode'.")
 
@@ -1280,7 +1281,7 @@ strip numbers instead."
 		      "del" "elif" "else" "except" "exec" "finally" "for"
 		      "from" "global" "if" "import" "in" "is" "lambda"
 		      "not" "or" "pass" "print" "raise" "return" "try"
-		      "while" "yield")))
+		      "while" "with" "yield")))
     (setq font-lock-keywords
 	  (list