58 |
;; Peter Eisenhauer <pipe@fzi.de> |
;; Peter Eisenhauer <pipe@fzi.de> |
59 |
;; Bug fixing in case nested indexes. |
;; Bug fixing in case nested indexes. |
60 |
;; Terry Tateyama <ttt@ursa0.cs.utah.edu> |
;; Terry Tateyama <ttt@ursa0.cs.utah.edu> |
61 |
;; Suggestion to use find-file-hooks for first imenu |
;; Suggestion to use find-file-hook for first imenu |
62 |
;; index building. |
;; index building. |
63 |
|
|
64 |
;;; Code: |
;;; Code: |
131 |
(make-variable-buffer-local 'which-func-mode) |
(make-variable-buffer-local 'which-func-mode) |
132 |
;;(put 'which-func-mode 'permanent-local t) |
;;(put 'which-func-mode 'permanent-local t) |
133 |
|
|
134 |
(add-hook 'find-file-hooks 'which-func-ff-hook t) |
(add-hook 'find-file-hook 'which-func-ff-hook t) |
135 |
|
|
136 |
(defun which-func-ff-hook () |
(defun which-func-ff-hook () |
137 |
"File find hook for Which Function mode. |
"File find hook for Which Function mode. |