    ^Actions^                  ^Misc^
 ^^^^^-------------------------------------------------------
   _a_: counsel ag            _A_: ag
-  _o_: occur                 _O_: moccur in same major-mode
-  _g_: rgrep                  _G_: counsel git grep
+  _o_: occur
+  _g_: rgrep                 _G_: counsel git grep
   _s_: swiper
 ^
 ^


;;; =================== occur =========================
;;; occur follow
(defun hong/occur-next-or-prev (next-or-prev)
  (lexical-let ((nop next-or-prev))
    (lambda () (interactive)
      (let ((buf (get-buffer-window (buffer-name))))
        (save-selected-window
          (if (eq nop 'next) (occur-next) (occur-prev))
          (occur-mode-goto-occurrence-other-window)
          (recenter))))))

(defadvice isearch-occur (after hong/occur-exit-isearch activate)
  (and (ignore-errors (select-window (get-buffer-window "*Occur*")))

  ("g" rgrep :color blue)
  ("G" counsel-git-grep :color blue)
  ("s" swiper :color blue)
  ("c" nil "cancel")
  ("q" nil "cancel"))

