summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/derived.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-09-18 07:14:43 +0000
committerGlenn Morris <rgm@gnu.org>2009-09-18 07:14:43 +0000
commit6726c25e2d185adcf10e0d95f70f3ab26528cadc (patch)
tree9512176f795fce7933239dfd0cca27ecc393fbc2 /lisp/emacs-lisp/derived.el
parent6188ea494da2e58456588e63a4ff105696c98c60 (diff)
downloademacs-6726c25e2d185adcf10e0d95f70f3ab26528cadc.tar.gz
(define-derived-mode): Fix paren typo in definition of abbrev table.
Diffstat (limited to 'lisp/emacs-lisp/derived.el')
-rw-r--r--lisp/emacs-lisp/derived.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/derived.el b/lisp/emacs-lisp/derived.el
index 347140e41f4..ef30d7ca33f 100644
--- a/lisp/emacs-lisp/derived.el
+++ b/lisp/emacs-lisp/derived.el
@@ -217,10 +217,10 @@ No problems result if this variable is not bound.
`(progn
(put ',abbrev 'definition-name ',child)
(defvar ,abbrev
- (progn (define-abbrev-table ',abbrev nil) ,abbrev)
- (unless (get ',abbrev 'variable-documentation)
- (put ',abbrev 'variable-documentation
- ,(format "Abbrev table for `%s'." child))))))
+ (progn (define-abbrev-table ',abbrev nil) ,abbrev))
+ (unless (get ',abbrev 'variable-documentation)
+ (put ',abbrev 'variable-documentation
+ ,(format "Abbrev table for `%s'." child)))))
(put ',child 'derived-mode-parent ',parent)
,(if group `(put ',child 'custom-mode-group ,group))