aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-09-30 03:42:56 +0000
committerGlenn Morris2008-09-30 03:42:56 +0000
commit9b3568e17d740cb62e7c26ad08075f18a0bf50cc (patch)
tree338841cd8e8dbc2e7af20e115cfc806ad4eb3557
parentfd1c81ef8493855a34a3259f52670cfd322b3d6c (diff)
downloademacs-9b3568e17d740cb62e7c26ad08075f18a0bf50cc.tar.gz
emacs-9b3568e17d740cb62e7c26ad08075f18a0bf50cc.zip
(which-func-imenu-joiner-function): Doc fix.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/progmodes/which-func.el12
2 files changed, 13 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f2e06d85506..ce275997a5c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,12 @@
12008-09-30 Glenn Morris <rgm@gnu.org>
2
3 * progmodes/which-func.el (which-func-imenu-joiner-function): Doc fix.
4
12008-09-30 Daniel Colascione <danc@merrillpress.com> 52008-09-30 Daniel Colascione <danc@merrillpress.com>
2 6
7 * progmodes/which-func.el (which-func-imenu-joiner-function): New.
8 (which-function): Handle nested imenu trees.
9
3 * imenu.el (imenu--split-menu): Fix bug with shared lists that deleted 10 * imenu.el (imenu--split-menu): Fix bug with shared lists that deleted
4 some nested menu items. 11 some nested menu items.
5 12
diff --git a/lisp/progmodes/which-func.el b/lisp/progmodes/which-func.el
index fa5fbee63de..7f7717d8ce0 100644
--- a/lisp/progmodes/which-func.el
+++ b/lisp/progmodes/which-func.el
@@ -1,7 +1,7 @@
1;;; which-func.el --- print current function in mode line 1;;; which-func.el --- print current function in mode line
2 2
3;; Copyright (C) 1994, 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 3;; Copyright (C) 1994, 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006
4;; Free Software Foundation, Inc. 4;; 2007, 2008 Free Software Foundation, Inc.
5 5
6;; Author: Alex Rezinsky <alexr@msil.sps.mot.com> 6;; Author: Alex Rezinsky <alexr@msil.sps.mot.com>
7;; (doesn't seem to be responsive any more) 7;; (doesn't seem to be responsive any more)
@@ -153,10 +153,10 @@ Zero means compute the Imenu menu regardless of size."
153;;;###autoload (put 'which-func-format 'risky-local-variable t) 153;;;###autoload (put 'which-func-format 'risky-local-variable t)
154 154
155(defvar which-func-imenu-joiner-function #'last 155(defvar which-func-imenu-joiner-function #'last
156 "Function to call when using imenu to join together multiple 156 "Function to join together multiple levels of imenu nomenclature.
157levels of nomenclature. Called with a single argument, a list of 157Called with a single argument, a list of strings giving the names
158strings giving the names of the menus we had to traverse to get 158of the menus we had to traverse to get to the item. Returns a
159to the item. Return a single string, the new name of the item.") 159single string, the new name of the item.")
160 160
161(defvar which-func-cleanup-function nil 161(defvar which-func-cleanup-function nil
162 "Function to transform a string before displaying it in the mode line. 162 "Function to transform a string before displaying it in the mode line.