Lisp: Add D-Bus methods to Imenu.
parent
393008e4d9
commit
d031411717
|
@ -19,6 +19,18 @@
|
||||||
;; Following defines are common, e.g. in Next.
|
;; Following defines are common, e.g. in Next.
|
||||||
(ambrevar/enhance-imenu-lisp "mode" "command" "parenscript")
|
(ambrevar/enhance-imenu-lisp "mode" "command" "parenscript")
|
||||||
|
|
||||||
|
;; For cl-dbus.
|
||||||
|
(add-to-list
|
||||||
|
'lisp-imenu-generic-expression
|
||||||
|
(list (purecopy "D-Bus")
|
||||||
|
(purecopy (concat "^\\s-*("
|
||||||
|
(eval-when-compile
|
||||||
|
(regexp-opt
|
||||||
|
(list "dbus:define-dbus-method")
|
||||||
|
t))
|
||||||
|
"\\s-+(\\([^)]+\\)"))
|
||||||
|
2))
|
||||||
|
|
||||||
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-prettify-before-save)
|
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-prettify-before-save)
|
||||||
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-complete-filename)
|
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-complete-filename)
|
||||||
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-tab-width-to-8) ; Because some existing code uses tabs.
|
(add-hook 'lisp-mode-hook 'ambrevar/turn-on-tab-width-to-8) ; Because some existing code uses tabs.
|
||||||
|
|
Loading…
Reference in New Issue