aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2011-01-17 18:49:59 -0800
committerGlenn Morris2011-01-17 18:49:59 -0800
commita9faac5c6333bcbfb30a00debf3de7a44e430e49 (patch)
tree32ac93da5a3873c87131704a6469838b044d575d /lisp
parentacce4a473ad27f2dec42cf2d35ffe3bb1acd471a (diff)
parent9d760d754bde2eadd3f017fec5ea1cbe3810d666 (diff)
downloademacs-a9faac5c6333bcbfb30a00debf3de7a44e430e49.tar.gz
emacs-a9faac5c6333bcbfb30a00debf3de7a44e430e49.zip
Merge from emacs-23 branch, up to 2010-05-20T22:16:19Z!juri@jurta.org.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/emacs-lisp/easy-mmode.el7
2 files changed, 9 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 969b0c6997a..2d381534228 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
12011-01-18 Stefan Monnier <monnier@iro.umontreal.ca> 12011-01-18 Stefan Monnier <monnier@iro.umontreal.ca>
2 2
3 * emacs-lisp/easy-mmode.el (define-minor-mode): Don't re-evaluate the
4 keymap expression. Improve docstring.
5
62011-01-18 Stefan Monnier <monnier@iro.umontreal.ca>
7
3 * electric.el (electric-indent-post-self-insert-function): 8 * electric.el (electric-indent-post-self-insert-function):
4 Don't auto-indent for indent-to-left-margin, it's too often 9 Don't auto-indent for indent-to-left-margin, it's too often
5 counter-productive. 10 counter-productive.
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 3d18d8e1cca..7f7198c36c9 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -94,8 +94,9 @@ Optional INIT-VALUE is the initial value of the mode's variable.
94Optional LIGHTER is displayed in the modeline when the mode is on. 94Optional LIGHTER is displayed in the modeline when the mode is on.
95Optional KEYMAP is the default keymap bound to the mode keymap. 95Optional KEYMAP is the default keymap bound to the mode keymap.
96 If non-nil, it should be a variable name (whose value is a keymap), 96 If non-nil, it should be a variable name (whose value is a keymap),
97 a keymap, or a list of arguments for `easy-mmode-define-keymap'. 97 or an expression that returns either a keymap or a list of
98 If KEYMAP is a keymap or list, this also defines the variable MODE-map. 98 arguments for `easy-mmode-define-keymap'. If KEYMAP is not a symbol,
99 this also defines the variable MODE-map.
99 100
100BODY contains code to execute each time the mode is enabled or disabled. 101BODY contains code to execute each time the mode is enabled or disabled.
101 It is executed after toggling the mode, and before running MODE-hook. 102 It is executed after toggling the mode, and before running MODE-hook.
@@ -274,7 +275,7 @@ With zero or negative ARG turn mode off.
274 (let ((m ,keymap)) 275 (let ((m ,keymap))
275 (cond ((keymapp m) m) 276 (cond ((keymapp m) m)
276 ((listp m) (easy-mmode-define-keymap m)) 277 ((listp m) (easy-mmode-define-keymap m))
277 (t (error "Invalid keymap %S" ,keymap)))) 278 (t (error "Invalid keymap %S" m))))
278 ,(format "Keymap for `%s'." mode-name))) 279 ,(format "Keymap for `%s'." mode-name)))
279 280
280 ,(if (not (symbolp mode)) 281 ,(if (not (symbolp mode))