comparison lisp/cedet/mode-local.el @ 104511:afd748c5780c

Use find-file-hook instead of obsolete name find-file-hooks.
author Chong Yidong <cyd@stupidchicken.com>
date Mon, 21 Sep 2009 18:24:56 +0000
parents 32af6b5a433d
children
comparison
equal deleted inserted replaced
104510:8c44231178fc 104511:afd748c5780c
129 (defun mode-local-on-major-mode-change () 129 (defun mode-local-on-major-mode-change ()
130 "Function called in `change-major-mode-hook'." 130 "Function called in `change-major-mode-hook'."
131 (add-to-list 'mode-local-changed-mode-buffers (current-buffer)) 131 (add-to-list 'mode-local-changed-mode-buffers (current-buffer))
132 (add-hook 'post-command-hook 'mode-local-post-major-mode-change t nil)) 132 (add-hook 'post-command-hook 'mode-local-post-major-mode-change t nil))
133 133
134 (add-hook 'find-file-hooks 'mode-local-post-major-mode-change) 134 (add-hook 'find-file-hook 'mode-local-post-major-mode-change)
135 (add-hook 'change-major-mode-hook 'mode-local-on-major-mode-change) 135 (add-hook 'change-major-mode-hook 'mode-local-on-major-mode-change)
136 136
137 ;;; Mode lineage 137 ;;; Mode lineage
138 ;; 138 ;;
139 (defsubst set-mode-local-parent (mode parent) 139 (defsubst set-mode-local-parent (mode parent)