# HG changeset patch # User Gerd Moellmann # Date 955312362 0 # Node ID e17da1f433965eba1308affe554d765b1ba6f077 # Parent b8ac36c5839153dc97618b47aa91ba6ed27fe640 *** empty log message *** diff -r b8ac36c58391 -r e17da1f43396 lisp/ChangeLog --- a/lisp/ChangeLog Sun Apr 09 20:30:25 2000 +0000 +++ b/lisp/ChangeLog Sun Apr 09 20:32:42 2000 +0000 @@ -1,5 +1,13 @@ 2000-04-09 Gerd Moellmann + * progmodes/ebrowse-ffh.el: New file. + + * progmodes/ebrowse.el (ebrowse-find-file-hook-fn): Moved + to ebrowse-ffh.el. + (ebrowse-load): Add autoload. + + * finder.el (finder-commentary): Add autoload cookie. + * mail/rfc2368.el: Correct author's email address. * progmodes/ebrowse.el: New file. diff -r b8ac36c58391 -r e17da1f43396 lisp/loaddefs.el --- a/lisp/loaddefs.el Sun Apr 09 20:30:25 2000 +0000 +++ b/lisp/loaddefs.el Sun Apr 09 20:32:42 2000 +0000 @@ -4876,10 +4876,16 @@ ;;;### (autoloads (ebrowse-save-tree-as ebrowse-tags-query-replace ;;;;;; ebrowse-tags-loop-continue ebrowse-tags-complete-symbol ebrowse-electric-choose-tree -;;;;;; ebrowse-tree-mode) "ebrowse" "progmodes/ebrowse.el" (14575 -;;;;;; 54558)) +;;;;;; ebrowse-tree-mode ebrowse-load) "ebrowse" "progmodes/ebrowse.el" +;;;;;; (14576 57912)) ;;; Generated autoloads from progmodes/ebrowse.el +(autoload (quote ebrowse-load) "ebrowse" "\ +Load an Ebrowse file FILE into memory and make a tree buffer. +Optional SWITCH non-nil means switch to the tree buffer afterwards. +This function is normally called from a `find-file-hook'. +Value is the tree buffer created." nil nil) + (autoload (quote ebrowse-tree-mode) "ebrowse" "\ Major mode for Ebrowse class tree buffers. Each line corresponds to a class in a class tree. @@ -4911,6 +4917,19 @@ ;;;*** +;;;### (autoloads (ebrowse-find-file-hook-fn) "ebrowse-ffh" "progmodes/ebrowse-ffh.el" +;;;;;; (14576 58508)) +;;; Generated autoloads from progmodes/ebrowse-ffh.el + +(autoload (quote ebrowse-find-file-hook-fn) "ebrowse-ffh" "\ +Function installed on `find-file-hooks'. +Load an Ebrowse class tree when there's special signature at +the beginning of the file." nil nil) + +(add-hook (quote find-file-hooks) (quote ebrowse-find-file-hook-fn)) + +;;;*** + ;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el" ;;;;;; (13778 5499)) ;;; Generated autoloads from ebuff-menu.el @@ -6567,6 +6586,22 @@ ;;;*** +;;;### (autoloads (finder-by-keyword finder-commentary finder-list-keywords) +;;;;;; "finder" "finder.el" (14576 32883)) +;;; Generated autoloads from finder.el + +(autoload (quote finder-list-keywords) "finder" "\ +Display descriptions of the keywords in the Finder buffer." t nil) + +(autoload (quote finder-commentary) "finder" "\ +Display FILE's commentary section. +FILE should be in a form suitable for passing to `locate-library'." t nil) + +(autoload (quote finder-by-keyword) "finder" "\ +Find packages matching a given keyword." t nil) + +;;;*** + ;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl" ;;;;;; "flow-ctrl.el" (12550 54450)) ;;; Generated autoloads from flow-ctrl.el diff -r b8ac36c58391 -r e17da1f43396 lisp/progmodes/ebrowse-ffh.el --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lisp/progmodes/ebrowse-ffh.el Sun Apr 09 20:32:42 2000 +0000 @@ -0,0 +1,40 @@ +;;; ebrowsehook.el --- Find file hook for ebrowse.el + +;; Copyright (C) 2000 Free Software Foundation Inc. + +;; Author: Gerd Moellmann +;; Maintainer: FSF +;; Keywords: C++ tags tools + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation; either version 2, or (at your option) +;; any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs; see the file COPYING. If not, write to +;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + +;;; Commentary: + +;;; Code: + +;;;###autoload +(defun ebrowse-find-file-hook-fn () + "Function installed on `find-file-hooks'. +Load an Ebrowse class tree when there's special signature at +the beginning of the file." + (when (looking-at "\\[ebrowse-hs") + (ebrowse-load buffer-file-name))) + +;;;###autoload +(add-hook 'find-file-hooks 'ebrowse-find-file-hook-fn) + + diff -r b8ac36c58391 -r e17da1f43396 src/ChangeLog Binary file src/ChangeLog has changed