mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(define-derived-mode): Create the abbrev-table from inside the `defvar'.

Browse source
This commit is contained in:
Stefan Monnier 2001-11-21 02:53:46 +00:00
parent 0b5549c149
commit b6b7eda9f0
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/derived.el
View file

@ -161,8 +161,8 @@ been generated automatically, with a reference to the keymap."
`(progn
(defvar ,map (make-sparse-keymap))
(defvar ,syntax (make-syntax-table))
(defvar ,abbrev)
(define-abbrev-table ',abbrev nil)
(defvar ,abbrev
(progn (define-abbrev-table ',abbrev nil) ,abbrev))
(put ',child 'derived-mode-parent ',parent)
(defun ,child ()