advice swiper to recenter

diff --git a/.emacs.d/config/emacs.org b/.emacs.d/config/emacs.org
index 2b7425a..b9b0f93 100644 (file)
--- a/.emacs.d/config/emacs.org
+++ b/.emacs.d/config/emacs.org
@@ -2605,7 +2605,14 @@ _l_ linum-mode:         % 4`linum-mode     _k_ linum relative:    %`linum-format
   :config
   (progn
     ;(ivy-mode 1)
-    (setq ivy-use-virtual-buffers t)))
+    (setq ivy-use-virtual-buffers t)
+    ;;advise swiper to recenter on exit
+    (defun bjm-swiper-recenter (&rest args)
+      "recenter display after swiper"
+      (recenter)
+      )
+    (advice-add 'swiper :after #'bjm-swiper-recenter)
+    ))
 #+END_SRC
 ** icicles
 [[http://article.gmane.org/gmane.emacs.orgmode/4574/match%3Dicicles]["In case you never heard of it, Icicles is to ‘TAB’ completion what