mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-10 15:56:18 +00:00
Code Issues Releases Activity

* lisp/imenu.el (imenu--split-submenus): Use imenu--subalist-p.

Browse Source 
Fixes: debbugs:12717
This commit is contained in:
Drew Adams 2012-11-14 21:02:00 -05:00 committed by Stefan Monnier
parent 589fc4791f
commit 875ce3a7c5
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2012-11-15 Drew Adams <drew.adams@oracle.com>
* imenu.el (imenu--split-submenus): Use imenu--subalist-p (bug#12717).
2012-11-15 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/cl-macs.el (cl--transform-lambda): Defend against

4
lisp/imenu.el
View File

@ -546,9 +546,7 @@ The returned alist DOES NOT share structure with MENULIST."
Return a split and sorted copy of ALIST. The returned alist DOES
NOT share structure with ALIST."
(mapcar (lambda (elt)
(if (and (consp elt)
(stringp (car elt))
(listp (cdr elt)))
(if (imenu--subalist-p elt)
(imenu--split-menu (cdr elt) (car elt))
elt))
alist))