;;; -*- mode: emacs-lisp; coding: utf-8 -*-
;;;
-;;; $Id$
-;;;
;;; Functions and macros for .emacs
;;;
;;; (c) 2004 Mark Wooding
(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'.")
"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