1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00

*** empty log message ***

This commit is contained in:
Gerd Moellmann 2000-04-09 20:32:42 +00:00
parent a4a76b61f9
commit c45be9accf
4 changed files with 93 additions and 2 deletions

View File

@ -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.

View File

@ -4876,10 +4876,16 @@ It returns the old style symbol." t nil)
;;;### (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)
;;;***
;;;### (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"
@ -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)
;;;***
;;;### (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"

View File

@ -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)

View File

@ -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.