From 835af516f1a5d78eaee533b8d815ffb8efb2d328 Mon Sep 17 00:00:00 2001 From: Adam Goldsmith Date: Thu, 17 Sep 2015 21:43:02 -0400 Subject: [PATCH] More improvements to hydra-mc --- .emacs.d/init-hydra.el | 32 ++++++++++++++++++++++---------- 1 file changed, 22 insertions(+), 10 deletions(-) diff --git a/.emacs.d/init-hydra.el b/.emacs.d/init-hydra.el index 35de542..7d042e0 100644 --- a/.emacs.d/init-hydra.el +++ b/.emacs.d/init-hydra.el @@ -40,16 +40,28 @@ ("t" todotxt-open-file "open todotxt") ("q" nil)) -(defhydra hydra-mc (:hint nil :columns 3) - "Multiple Cursors" - ("a" mc/mark-all-dwim "mark all dwim") - ("s" mc/mark-all-symbols-like-this "mark all dwim") - ("l" mc/edit-lines "edit lines") - ("e" mc/edit-ends-of-lines "edit ends of lines") - ("" mc/mark-next-like-this "mark next like this") - ("" mc/mark-previous-like-this "mark prev like this") - ("S-" mc/unmark-previous-like-this "mark prev like this") - ("S-" mc/unmark-next-like-this "mark next like this")) +(defhydra hydra-mc (:hint nil) + " + Mark Bulk: _a_ll _s_ymbols _r_egex + Edit: _l_ines _e_nds + Misc: _n_umbers _S_ort +Mark (+S=unmark): __:prev __:next __:skip prev __:skip next " + ("a" mc/mark-all-dwim) + ("s" mc/mark-all-symbols-like-this) + ("r" mc/mark-all-in-region-regexp) + + ("l" mc/edit-lines) + ("e" mc/edit-ends-of-lines) + + ("n" mc/insert-numbers) + ("S" mc/sort-regions) + + ("" mc/mark-next-like-this) + ("" mc/mark-previous-like-this) + ("S-" mc/unmark-previous-like-this) + ("S-" mc/unmark-next-like-this) + ("" mc/skip-to-next-like-this) + ("" mc/skip-to-previous-like-this)) (defhydra hydra-avy (:hint nil :color blue) "