Refactor doom-popup-prop (cond -> pcase)

2017-07-11 01:06:26 +02:00 · 2017-07-11 01:06:26 +02:00 · d6133adef0
commit d6133adef0
parent 65696cebf6
1 changed files with 3 additions and 4 deletions
--- a/core/autoload/popups.el
+++ b/core/autoload/popups.el
@ -152,10 +152,9 @@ only close popups that have an :autoclose property in their rule (see
                       doom-popup-rules)
                     (window-parameter window 'popup))
                 prop)
-      (cond ((eq prop :size)
-             shackle-default-size)
-            ((eq prop :align)
-             shackle-default-alignment))))
+      (pcase prop
+        (:size  shackle-default-size)
+        (:align shackle-default-alignment))))

 ;;;###autoload
 (defun doom-popup-side (&optional window)