procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(define-derived-mode): Fix paren typo in definition of abbrev table.

Browse source
This commit is contained in:
Glenn Morris 2009-09-18 07:14:43 +00:00
parent 6188ea494d
commit 6726c25e2d
2 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/emacs-lisp/derived.el
View file

@ -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))