mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-25 07:40:40 -07:00
Code Issues Projects Releases Wiki Activity

(find-function-search-for-symbol): Use find-file-hook instead of ...-hooks.

Browse source
This commit is contained in:
Stefan Monnier 2002-08-15 00:08:48 +00:00
parent 7adee48a65
commit b88b46f269
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/find-func.el
View file

@ -127,7 +127,7 @@ If VARIABLE-P is nil, `find-function-regexp' is used, otherwise
(setq library (substring library 0 (match-beginning 1))))
(let* ((path find-function-source-path)
(compression (or (rassq 'jka-compr-handler file-name-handler-alist)
(member 'crypt-find-file-hook find-file-hooks)))
(member 'crypt-find-file-hook find-file-hook)))
(filename (progn
;; use `file-name-sans-extension' here? (if it gets fixed)
(if (string-match "\\(\\.el\\)\\'" library)