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

[Luc Teirlinck]

Index: emacs/lisp/emacs-lisp/easy-mmode.el
diff -c emacs/lisp/emacs-lisp/easy-mmode.el:1.62 
emacs/lisp/emacs-lisp/easy-mmode.el:1.63
*** emacs/lisp/emacs-lisp/easy-mmode.el:1.62    Tue May 17 15:17:18 2005
--- emacs/lisp/emacs-lisp/easy-mmode.el Sun May 22 22:07:22 2005
***************
*** 172,178 ****
        (setq group
            `(:group ',(intern (replace-regexp-in-string
                                "-mode\\'" "" mode-name)))))
!     
      `(progn
         ;; Define the variable to enable or disable the mode.
         ,(if (not globalp)
--- 172,178 ----
        (setq group
            `(:group ',(intern (replace-regexp-in-string
                                "-mode\\'" "" mode-name)))))
! 
      `(progn
         ;; Define the variable to enable or disable the mode.
         ,(if (not globalp)
***************
*** 306,314 ****
         ;; Setup hook to handle future mode changes and new buffers.
         (if ,global-mode
             (progn
!              (add-hook 'find-file-hook ',buffers)
               (add-hook 'change-major-mode-hook ',cmmh))
!          (remove-hook 'find-file-hook ',buffers)
           (remove-hook 'change-major-mode-hook ',cmmh))
  
         ;; Go through existing buffers.
--- 306,314 ----
         ;; Setup hook to handle future mode changes and new buffers.
         (if ,global-mode
             (progn
!              (add-hook 'after-change-major-mode-hook ',buffers)
               (add-hook 'change-major-mode-hook ',cmmh))
!          (remove-hook 'after-change-major-mode-hook ',buffers)
           (remove-hook 'change-major-mode-hook ',cmmh))
  
         ;; Go through existing buffers.