*** empty log message ***

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 36aa9eefa6f2e357fa1305a2a30ebb1de05d7a32..a7aff2e3cbd6164e81bf932e2959c5308461a366 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,13 @@
 2000-04-09  Gerd Moellmann  <gerd@gnu.org>
 
+       * 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 --git a/lisp/loaddefs.el b/lisp/loaddefs.el
index a78d0906866c77dfa378bdfd06aa81b7c3f9cd7b..e9ca2146fdc9e865895be7606015a5f106a54c4b 100644 (file)
--- a/lisp/loaddefs.el
+++ b/lisp/loaddefs.el
@@ -4876,10 +4876,16 @@ It returns the old style symbol." t nil)
 \f
 ;;;### (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.
@@ -4909,6 +4915,19 @@ Write the current tree data structure to a file.
 Read the file name from the minibuffer if interactive.
 Otherwise, FILE-NAME specifies the file to save the tree in." t nil)
 
+;;;***
+\f
+;;;### (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))
+
 ;;;***
 \f
 ;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el"
@@ -6565,6 +6584,22 @@ Find directly the function at point in the other window." t nil)
 (autoload (quote find-function-setup-keys) "find-func" "\
 Define some key bindings for the find-function family of functions." nil nil)
 
+;;;***
+\f
+;;;### (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)
+
 ;;;***
 \f
 ;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl"

diff --git a/lisp/progmodes/ebrowse-ffh.el b/lisp/progmodes/ebrowse-ffh.el
new file mode 100644 (file)
index 0000000..3dd511e
--- /dev/null
+++ b/lisp/progmodes/ebrowse-ffh.el
@@ -0,0 +1,40 @@
+;;; ebrowsehook.el --- Find file hook for ebrowse.el
+
+;; Copyright (C) 2000 Free Software Foundation Inc.
+
+;; Author: Gerd Moellmann <gerd@gnu.org>
+;; 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 --git a/src/ChangeLog b/src/ChangeLog
index 6efbd878aee0cd4d9a96f3ec28a9c5bd81d0a2e5..4ffb5a71593234a810fb395da274ea4988ea4332 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,13 @@
 2000-04-09  Gerd Moellmann  <gerd@gnu.org>
 
+       * xfaces.c (tty_suppress_bold_inverse_default_colors_p): New
+       variable.
+       (realize_tty_face): Suppress boldness if colors are the inverse of
+       the default colors, and tty_suppress_bold_inverse_default_colors_p
+       is set.
+       (Ftty_suppress_bold_inverse_default_colors): New function.
+       (syms_of_xfaces): Defsubr it.
+
        * buffer.c (Frestore_buffer_modified_p): New function.
        (syms_of_buffer): Defsubr it.