jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

isearch-occur is included in emacs core upstream

Browse source 
Looks like it was originally incorporated in 2007,
6e3057bbed.

Technically this is bound to `M-s o` by default, but `C-o` is a nice shortcut.
This commit is contained in:
Charles Comstock 2015-07-06 03:01:18 -05:00
parent d073402257
commit a8a83aeb5e
1 changed files with 1 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
core/prelude-global-keybindings.el
View file

@ -89,12 +89,7 @@
(global-set-key [remap kill-whole-line] 'prelude-kill-whole-line) (global-set-key [remap kill-whole-line] 'prelude-kill-whole-line)
;; Activate occur easily inside isearch ;; Activate occur easily inside isearch
(define-key isearch-mode-map (kbd "C-o") (define-key isearch-mode-map (kbd "C-o") 'isearch-occur)
(lambda () (interactive)
(let ((case-fold-search isearch-case-fold-search))
(occur (if isearch-regexp
isearch-string
(regexp-quote isearch-string))))))
;; use hippie-expand instead of dabbrev ;; use hippie-expand instead of dabbrev
(global-set-key (kbd "M-/") 'hippie-expand) (global-set-key (kbd "M-/") 'hippie-expand)