Override shackle-match since my PR got rejected

diff --git a/lisp/my-shackle.el b/lisp/my-shackle.el
index 66d9d2d9c8712ae769faf74eaa77946b12a01b00..6965b965719a6ac401fdef3929d00f0e6badac53 100644 (file)
--- a/lisp/my-shackle.el
+++ b/lisp/my-shackle.el
@@ -27,10 +27,14 @@
      (t
       (append rules-common rules-narrow-short)))))
 
-(setq shackle-rules #'my/shackle-rules)
-
 (setq shackle-default-rule '(:align below :select t :size 15))
 
 (setq shackle-default-size 0.5)
 
+(defun shackle-match (buffer-or-name)
+  (cl-loop for (condition . plist) in (my/shackle-rules)
+           when (shackle--match buffer-or-name condition plist)
+           return plist
+           finally return shackle-default-rule))
+
 (shackle-mode)

diff --git a/packages/shackle b/packages/shackle
index 1e40f3519518b0efef76c70e8f6e5666b8eb5745..4189c1c773aab533969b587f7801ffbcd1d7d613 160000 (submodule)
--- a/packages/shackle
+++ b/packages/shackle
@@ -1 +1 @@
-Subproject commit 1e40f3519518b0efef76c70e8f6e5666b8eb5745
+Subproject commit 4189c1c773aab533969b587f7801ffbcd1d7d613