mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-01 11:14:55 +00:00
(define-derived-mode): Fix paren typo in definition of abbrev table.
This commit is contained in:
parent
6188ea494d
commit
6726c25e2d
@ -1,5 +1,8 @@
|
||||
2009-09-18 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* emacs-lisp/derived.el (define-derived-mode): Fix paren typo in
|
||||
definition of abbrev table.
|
||||
|
||||
* net/eudc-bob.el (eudc-bob-pipe-object-to-external-program):
|
||||
* net/eudc.el (eudc-expand-inline):
|
||||
* net/newst-backend.el (newsticker--cache-read-feed): Fix typos in
|
||||
|
@ -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))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user