[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/find-func.el

[Stefan Monnier]

Index: emacs/lisp/emacs-lisp/find-func.el
diff -c emacs/lisp/emacs-lisp/find-func.el:1.36 
emacs/lisp/emacs-lisp/find-func.el:1.37
*** emacs/lisp/emacs-lisp/find-func.el:1.36     Mon Aug 12 21:49:40 2002
--- emacs/lisp/emacs-lisp/find-func.el  Wed Aug 14 20:08:48 2002
***************
*** 127,133 ****
        (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)))
           (filename (progn
                       ;; use `file-name-sans-extension' here? (if it gets 
fixed)
                       (if (string-match "\\(\\.el\\)\\'" library)
--- 127,133 ----
        (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-hook)))
           (filename (progn
                       ;; use `file-name-sans-extension' here? (if it gets 
fixed)
                       (if (string-match "\\(\\.el\\)\\'" library)