Mercurial > emacs
changeset 105075:9005ea5eb958
(define-derived-mode): Fix paren typo in definition of abbrev table.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Fri, 18 Sep 2009 07:14:43 +0000 |
| parents | 45b5d5aae703 |
| children | 8a45209e673f |
| files | lisp/ChangeLog lisp/emacs-lisp/derived.el |
| diffstat | 2 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Sep 18 07:07:33 2009 +0000 +++ b/lisp/ChangeLog Fri Sep 18 07:14:43 2009 +0000 @@ -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
--- a/lisp/emacs-lisp/derived.el Fri Sep 18 07:07:33 2009 +0000 +++ b/lisp/emacs-lisp/derived.el Fri Sep 18 07:14:43 2009 +0000 @@ -217,10 +217,10 @@ `(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))