From 11de8e7921f52763777d4d8349ce28e02ba9bb31 Mon Sep 17 00:00:00 2001 From: Peng Li Date: Thu, 21 Jul 2016 10:25:57 +0800 Subject: [PATCH] emacs - swiper tidyup --- emacs.d/config.org | 26 ++++++++------------------ 1 file changed, 8 insertions(+), 18 deletions(-) diff --git a/emacs.d/config.org b/emacs.d/config.org index 17af230..bc97b89 100644 --- a/emacs.d/config.org +++ b/emacs.d/config.org @@ -2418,27 +2418,17 @@ stolen from [[https://github.com/mariolong/emacs.d/blob/f6a061594ef1b5d1f4750e9d :ensure t :init (setq ivy-use-virtual-buffers t) + (set-face-attribute 'ivy-current-match nil :background "Orange" :foreground "black") :config (ivy-mode) (global-set-key (kbd "s-/") 'swiper) - (define-key swiper-map (kbd "M-r") 'swiper-query-replace)) - - (set-face-attribute - 'ivy-current-match nil - :background "Orange" - :foreground "black") - - (eval-after-load 'swiper - '(progn - (define-key swiper-map (kbd "C-.") - (lambda () - (interactive) - (insert (format "%s" (with-ivy-window (thing-at-point 'word)))))) - (define-key swiper-map (kbd "M-.") - (lambda () - (interactive) - (insert (format "%s" (with-ivy-window (thing-at-point 'symbol)))))) - )) + (define-key swiper-map (kbd "M-r") 'swiper-query-replace) + (define-key swiper-map (kbd "C-.") (lambda () + (interactive) + (insert (format "%s" (with-ivy-window (thing-at-point 'word)))))) + (define-key swiper-map (kbd "M-.") (lambda () + (interactive) + (insert (format "%s" (with-ivy-window (thing-at-point 'symbol))))))) #+END_SRC * TODO Temp directory for cached/history/temp files -- 2.11.0