# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 955311807 0
# Node ID e6096d02680f2b9cd5cb458706d9bfd1f7189d76
# Parent  297e03ccd7e684796b6e35b38bde2e6c497617b8
(ebrowse-find-file-hook-fn): Moved
to ebrowse-ffh.el.
(ebrowse-load): Add autoload.

diff -r 297e03ccd7e6 -r e6096d02680f lisp/progmodes/ebrowse.el
--- a/lisp/progmodes/ebrowse.el	Sun Apr 09 17:28:38 2000 +0000
+++ b/lisp/progmodes/ebrowse.el	Sun Apr 09 20:23:27 2000 +0000
@@ -899,14 +899,6 @@
 
 ;;; Reading a tree from disk
 
-(defun ebrowse-find-file ()
-  "Function installed as `find-file hook'.
-This loads a tree when it sees a special signature at the beginning of
-the file loaded."
-  (when (looking-at "\\[ebrowse-hs")
-    (ebrowse-load buffer-file-name 'switch)))
-
-
 (defun ebrowse-read ()
   "Read `ebrowse-hs' and `ebrowse-ts' structures in the current buffer.  
 Return a list (HEADER TREE) where HEADER is the file header read
@@ -935,6 +927,7 @@
     (list header tree)))
 
 
+;;;###autoload
 (defun ebrowse-load (file &optional switch)
   "Load an Ebrowse file FILE into memory and make a tree buffer.
 Optional SWITCH non-nil means switch to the tree buffer afterwards.
@@ -4555,11 +4548,6 @@
 
 
 
-;;; Hooks installed
-
-(add-hook 'find-file-hooks 'ebrowse-find-file)
-
-
 (provide 'ebrowse)
 
 ;;; Local variables: