(find-function-search-for-symbol): Use find-file-hook instead of ...-hooks.
authorStefan Monnier <monnier@iro.umontreal.ca>
Thu, 15 Aug 2002 00:08:48 +0000 (00:08 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Thu, 15 Aug 2002 00:08:48 +0000 (00:08 +0000)
lisp/emacs-lisp/find-func.el

index 1ced2ea..e305fac 100644 (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)