[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/derived.el

[Luc Teirlinck]

Index: emacs/lisp/emacs-lisp/derived.el
diff -c emacs/lisp/emacs-lisp/derived.el:1.12 
emacs/lisp/emacs-lisp/derived.el:1.13
*** emacs/lisp/emacs-lisp/derived.el:1.12       Sat Aug  6 17:08:59 2005
--- emacs/lisp/emacs-lisp/derived.el    Mon Nov 14 23:05:53 2005
***************
*** 194,200 ****
                     parent child docstring syntax abbrev))
  
      `(progn
!        (defvar ,hook nil ,(format "Hook run when entering %s mode." name))
         (defvar ,map (make-sparse-keymap))
         ,(if declare-syntax
            `(defvar ,syntax (make-syntax-table)))
--- 194,205 ----
                     parent child docstring syntax abbrev))
  
      `(progn
!        (unless (get  ',hook 'variable-documentation)
!        (put ',hook 'variable-documentation
!             ,(format "Hook run when entering %s mode.
! No problems result if this variable is not bound.
! `add-hook' automatically binds it.  (This is true for all hook variables.)"
!                      name)))
         (defvar ,map (make-sparse-keymap))
         ,(if declare-syntax
            `(defvar ,syntax (make-syntax-table)))