Browse Source

Use swiper for M-C-s

master
10sr 4 years ago
parent
commit
2d9cba5d8b
Signed by: 10sr GPG Key ID: C384BB17CBB19347
1 changed files with 4 additions and 1 deletions
  1. +4
    -1
      emacs.el

+ 4
- 1
emacs.el View File

@@ -2837,11 +2837,14 @@ Any output will be written to current buffer."
(when (fboundp 'counsel-imenu) (when (fboundp 'counsel-imenu)
(define-key ctl-x-map "l" 'counsel-imenu)) (define-key ctl-x-map "l" 'counsel-imenu))


(when (fboundp 'swiper)
(define-key esc-map (kbd "C-s") 'swiper))

(when (fboundp 'swoop) (when (fboundp 'swoop)
;; (global-set-key (kbd "C-s") 'swoop) ;; (global-set-key (kbd "C-s") 'swoop)
;; (global-set-key (kbd "C-r") 'swoop) ;; (global-set-key (kbd "C-r") 'swoop)
;; (define-key esc-map (kbd "C-s") 'swoop-multi) ;; (define-key esc-map (kbd "C-s") 'swoop-multi)
(define-key esc-map (kbd "C-s") 'swoop)
;; (define-key esc-map (kbd "C-s") 'swoop)
(with-eval-after-load 'swoop-lib (with-eval-after-load 'swoop-lib
(defvar swoop-map) (defvar swoop-map)
(define-key swoop-map (kbd "C-s") 'swoop-action-goto-line-next) (define-key swoop-map (kbd "C-s") 'swoop-action-goto-line-next)


Loading…
Cancel
Save