aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann2000-04-09 20:32:42 +0000
committerGerd Moellmann2000-04-09 20:32:42 +0000
commitc45be9accf5c3ead49e1ae768f4a7041c7d8f3ae (patch)
tree68d5ea905f16edbd3b56ccdd02ae8f3fc772799e
parenta4a76b61f9891681feccd0fc1cc765e6be4186be (diff)
downloademacs-c45be9accf5c3ead49e1ae768f4a7041c7d8f3ae.tar.gz
emacs-c45be9accf5c3ead49e1ae768f4a7041c7d8f3ae.zip
*** empty log message ***
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/loaddefs.el39
-rw-r--r--lisp/progmodes/ebrowse-ffh.el40
-rw-r--r--src/ChangeLog8
4 files changed, 93 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 36aa9eefa6f..a7aff2e3cbd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,13 @@
12000-04-09 Gerd Moellmann <gerd@gnu.org> 12000-04-09 Gerd Moellmann <gerd@gnu.org>
2 2
3 * progmodes/ebrowse-ffh.el: New file.
4
5 * progmodes/ebrowse.el (ebrowse-find-file-hook-fn): Moved
6 to ebrowse-ffh.el.
7 (ebrowse-load): Add autoload.
8
9 * finder.el (finder-commentary): Add autoload cookie.
10
3 * mail/rfc2368.el: Correct author's email address. 11 * mail/rfc2368.el: Correct author's email address.
4 12
5 * progmodes/ebrowse.el: New file. 13 * progmodes/ebrowse.el: New file.
diff --git a/lisp/loaddefs.el b/lisp/loaddefs.el
index a78d0906866..e9ca2146fdc 100644
--- a/lisp/loaddefs.el
+++ b/lisp/loaddefs.el
@@ -4876,10 +4876,16 @@ It returns the old style symbol." t nil)
4876 4876
4877;;;### (autoloads (ebrowse-save-tree-as ebrowse-tags-query-replace 4877;;;### (autoloads (ebrowse-save-tree-as ebrowse-tags-query-replace
4878;;;;;; ebrowse-tags-loop-continue ebrowse-tags-complete-symbol ebrowse-electric-choose-tree 4878;;;;;; ebrowse-tags-loop-continue ebrowse-tags-complete-symbol ebrowse-electric-choose-tree
4879;;;;;; ebrowse-tree-mode) "ebrowse" "progmodes/ebrowse.el" (14575 4879;;;;;; ebrowse-tree-mode ebrowse-load) "ebrowse" "progmodes/ebrowse.el"
4880;;;;;; 54558)) 4880;;;;;; (14576 57912))
4881;;; Generated autoloads from progmodes/ebrowse.el 4881;;; Generated autoloads from progmodes/ebrowse.el
4882 4882
4883(autoload (quote ebrowse-load) "ebrowse" "\
4884Load an Ebrowse file FILE into memory and make a tree buffer.
4885Optional SWITCH non-nil means switch to the tree buffer afterwards.
4886This function is normally called from a `find-file-hook'.
4887Value is the tree buffer created." nil nil)
4888
4883(autoload (quote ebrowse-tree-mode) "ebrowse" "\ 4889(autoload (quote ebrowse-tree-mode) "ebrowse" "\
4884Major mode for Ebrowse class tree buffers. 4890Major mode for Ebrowse class tree buffers.
4885Each line corresponds to a class in a class tree. 4891Each line corresponds to a class in a class tree.
@@ -4911,6 +4917,19 @@ Otherwise, FILE-NAME specifies the file to save the tree in." t nil)
4911 4917
4912;;;*** 4918;;;***
4913 4919
4920;;;### (autoloads (ebrowse-find-file-hook-fn) "ebrowse-ffh" "progmodes/ebrowse-ffh.el"
4921;;;;;; (14576 58508))
4922;;; Generated autoloads from progmodes/ebrowse-ffh.el
4923
4924(autoload (quote ebrowse-find-file-hook-fn) "ebrowse-ffh" "\
4925Function installed on `find-file-hooks'.
4926Load an Ebrowse class tree when there's special signature at
4927the beginning of the file." nil nil)
4928
4929(add-hook (quote find-file-hooks) (quote ebrowse-find-file-hook-fn))
4930
4931;;;***
4932
4914;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el" 4933;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el"
4915;;;;;; (13778 5499)) 4934;;;;;; (13778 5499))
4916;;; Generated autoloads from ebuff-menu.el 4935;;; Generated autoloads from ebuff-menu.el
@@ -6567,6 +6586,22 @@ Define some key bindings for the find-function family of functions." nil nil)
6567 6586
6568;;;*** 6587;;;***
6569 6588
6589;;;### (autoloads (finder-by-keyword finder-commentary finder-list-keywords)
6590;;;;;; "finder" "finder.el" (14576 32883))
6591;;; Generated autoloads from finder.el
6592
6593(autoload (quote finder-list-keywords) "finder" "\
6594Display descriptions of the keywords in the Finder buffer." t nil)
6595
6596(autoload (quote finder-commentary) "finder" "\
6597Display FILE's commentary section.
6598FILE should be in a form suitable for passing to `locate-library'." t nil)
6599
6600(autoload (quote finder-by-keyword) "finder" "\
6601Find packages matching a given keyword." t nil)
6602
6603;;;***
6604
6570;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl" 6605;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl"
6571;;;;;; "flow-ctrl.el" (12550 54450)) 6606;;;;;; "flow-ctrl.el" (12550 54450))
6572;;; Generated autoloads from flow-ctrl.el 6607;;; Generated autoloads from flow-ctrl.el
diff --git a/lisp/progmodes/ebrowse-ffh.el b/lisp/progmodes/ebrowse-ffh.el
new file mode 100644
index 00000000000..3dd511e400c
--- /dev/null
+++ b/lisp/progmodes/ebrowse-ffh.el
@@ -0,0 +1,40 @@
1;;; ebrowsehook.el --- Find file hook for ebrowse.el
2
3;; Copyright (C) 2000 Free Software Foundation Inc.
4
5;; Author: Gerd Moellmann <gerd@gnu.org>
6;; Maintainer: FSF
7;; Keywords: C++ tags tools
8
9;; This file is part of GNU Emacs.
10
11;; GNU Emacs is free software; you can redistribute it and/or modify
12;; it under the terms of the GNU General Public License as published by
13;; the Free Software Foundation; either version 2, or (at your option)
14;; any later version.
15
16;; GNU Emacs is distributed in the hope that it will be useful,
17;; but WITHOUT ANY WARRANTY; without even the implied warranty of
18;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19;; GNU General Public License for more details.
20
21;; You should have received a copy of the GNU General Public License
22;; along with GNU Emacs; see the file COPYING. If not, write to
23;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
24
25;;; Commentary:
26
27;;; Code:
28
29;;;###autoload
30(defun ebrowse-find-file-hook-fn ()
31 "Function installed on `find-file-hooks'.
32Load an Ebrowse class tree when there's special signature at
33the beginning of the file."
34 (when (looking-at "\\[ebrowse-hs")
35 (ebrowse-load buffer-file-name)))
36
37;;;###autoload
38(add-hook 'find-file-hooks 'ebrowse-find-file-hook-fn)
39
40
diff --git a/src/ChangeLog b/src/ChangeLog
index 6efbd878aee..4ffb5a71593 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,13 @@
12000-04-09 Gerd Moellmann <gerd@gnu.org> 12000-04-09 Gerd Moellmann <gerd@gnu.org>
2 2
3 * xfaces.c (tty_suppress_bold_inverse_default_colors_p): New
4 variable.
5 (realize_tty_face): Suppress boldness if colors are the inverse of
6 the default colors, and tty_suppress_bold_inverse_default_colors_p
7 is set.
8 (Ftty_suppress_bold_inverse_default_colors): New function.
9 (syms_of_xfaces): Defsubr it.
10
3 * buffer.c (Frestore_buffer_modified_p): New function. 11 * buffer.c (Frestore_buffer_modified_p): New function.
4 (syms_of_buffer): Defsubr it. 12 (syms_of_buffer): Defsubr it.
5 13