Commit b6b7eda9 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

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

parent 0b5549c1
...@@ -161,8 +161,8 @@ been generated automatically, with a reference to the keymap." ...@@ -161,8 +161,8 @@ been generated automatically, with a reference to the keymap."
`(progn `(progn
(defvar ,map (make-sparse-keymap)) (defvar ,map (make-sparse-keymap))
(defvar ,syntax (make-syntax-table)) (defvar ,syntax (make-syntax-table))
(defvar ,abbrev) (defvar ,abbrev
(define-abbrev-table ',abbrev nil) (progn (define-abbrev-table ',abbrev nil) ,abbrev))
(put ',child 'derived-mode-parent ',parent) (put ',child 'derived-mode-parent ',parent)
(defun ,child () (defun ,child ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment