about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2024-01-02 16:22:44 +0000
committerDavid Morgan <djm_uk@protonmail.com>2024-01-02 16:22:44 +0000
commita68fe3a6fc018eca8f9e68e7b381e9d1dc5f1a9d (patch)
treeda2f4f3dc2585819de729ffeb439cdbe7f9087da
parent058e57f6e94602de57d3704489fac8f0def38301 (diff)
downloaddotfiles-a68fe3a6fc018eca8f9e68e7b381e9d1dc5f1a9d.tar.gz
WIP: fix persp-buffer-flip-skip-buffer
-rw-r--r--.emacs.d/lisp/init-windows.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/.emacs.d/lisp/init-windows.el b/.emacs.d/lisp/init-windows.el
index 477655c..2bf54a3 100644
--- a/.emacs.d/lisp/init-windows.el
+++ b/.emacs.d/lisp/init-windows.el
@@ -176,13 +176,13 @@
 (use-package buffer-flip
   :custom (buffer-flip-skip-patterns '("^[*]"))
   :config
-  ;; (defun persp-buffer-flip-skip-buffer (orig &rest args)
-  ;;   (or (apply orig args)
-  ;;       (persp-buffer-filter (car args))))
-  ;; (advice-add 'buffer-flip-skip-buffer :around 'persp-buffer-flip-skip-buffer)
-  (defun persp-buffer-flip-skip-buffer (orig-val)
-    (or orig-val (persp-buffer-filter (car args))))
-  (advice-add 'buffer-flip-skip-buffer :filter-return 'persp-buffer-flip-skip-buffer)
+  (defun persp-buffer-flip-skip-buffer (orig &rest args)
+    (or (apply orig args)
+        (persp-buffer-filter (car args))))
+  (advice-add 'buffer-flip-skip-buffer :around 'persp-buffer-flip-skip-buffer)
+  ;; (defun persp-buffer-flip-skip-buffer (orig-val &rest args)
+  ;;   (or orig-val (persp-buffer-filter (car args))))
+  ;; (advice-add 'buffer-flip-skip-buffer :filter-return 'persp-buffer-flip-skip-buffer)
   :bind  (("C-c C-<left>" . buffer-flip)
           (:map buffer-flip-map
                 ( "C-<left>" .   buffer-flip-forward)