]> code.delx.au - gnu-emacs-elpa/commitdiff
swiper.el (swiper-occur): Fix for non-file buffers
authorOleh Krehel <ohwoeowho@gmail.com>
Fri, 4 Mar 2016 14:29:51 +0000 (15:29 +0100)
committerOleh Krehel <ohwoeowho@gmail.com>
Fri, 4 Mar 2016 14:29:51 +0000 (15:29 +0100)
swiper.el

index a2c325554e0abb20f7cd924e0598e20c8afe7184..b52d0fe8481c61dd56f48d6dfede44a227e84282 100644 (file)
--- a/swiper.el
+++ b/swiper.el
@@ -321,8 +321,10 @@ When non-nil, INITIAL-INPUT is the initial search pattern."
   (let* ((buffer (ivy-state-buffer ivy-last))
          (fname (propertize
                  (with-ivy-window
-                   (file-name-nondirectory
-                    (buffer-file-name buffer)))
+                   (if (buffer-file-name buffer)
+                       (file-name-nondirectory
+                        (buffer-file-name buffer))
+                     (buffer-name buffer)))
                  'face
                  'compilation-info))
          (cands (mapcar