branch: master commit a4c4eb6acbe2a2de689a11bd6cfe1bd5f8d476eb Author: Oleh Krehel <ohwoeo...@gmail.com> Commit: Oleh Krehel <ohwoeo...@gmail.com>
Add example for `Buffer-menu-mode' --- hydra-examples.el | 31 +++++++++++++++++++++++++++++++ 1 files changed, 31 insertions(+), 0 deletions(-) diff --git a/hydra-examples.el b/hydra-examples.el index 586bb2f..fbe77ee 100644 --- a/hydra-examples.el +++ b/hydra-examples.el @@ -187,6 +187,37 @@ _w_ whitespace-mode: %`whitespace-mode ;; "foobar %`abbrev-mode" means roughly (format "foobar %S" abbrev-mode) ;; ;; This means that you actually see the state of the mode that you're changing. +;;** Example 8: the whole menu for `Buffer-menu-mode' +(defhydra hydra-buffer-menu (:color pink) + " + Mark Unmark Actions Search +------------------------------------------------------------------------- (__) +_m_: mark _u_: unmark _x_: execute _R_: re-isearch (oo) +_s_: save _U_: unmark up _b_: bury _I_: isearch /------\\/ +_d_: delete _g_: refresh _O_: multi-occur / | || +_D_: delete up _T_: files only: % -28`Buffer-menu-files-only * /\\---/\\ +_~_: modified ~~ ~~ +" + ("m" Buffer-menu-mark nil) + ("u" Buffer-menu-unmark nil) + ("U" Buffer-menu-backup-unmark nil) + ("d" Buffer-menu-delete nil) + ("D" Buffer-menu-delete-backwards nil) + ("s" Buffer-menu-save nil) + ("~" Buffer-menu-not-modified nil) + ("x" Buffer-menu-execute nil) + ("b" Buffer-menu-bury nil) + ("g" revert-buffer nil) + ("T" Buffer-menu-toggle-files-only nil) + ("O" Buffer-menu-multi-occur nil :color blue) + ("I" Buffer-menu-isearch-buffers nil :color blue) + ("R" Buffer-menu-isearch-buffers-regexp nil :color blue) + ("c" nil "cancel") + ("v" Buffer-menu-select "select" :color blue) + ("o" Buffer-menu-other-window "other-window" :color blue) + ("q" quit-window "quit" :color blue)) +;; Recommended binding: +;; (define-key Buffer-menu-mode-map "." 'hydra-buffer-menu/body) ;;* Windmove helpers (require 'windmove)