about summary refs log tree commit diff
path: root/third_party/exwm/exwm-floating.el
diff options
context:
space:
mode:
authorVincent Ambo <mail@tazj.in>2024-06-10T07·51+0300
committerVincent Ambo <mail@tazj.in>2024-06-10T07·51+0300
commit179a4e36d7419394494a19a5f005b0ff4a1dffe9 (patch)
treeded977fbf971fc8825b9b0ba4c2ebdf23f3b1f45 /third_party/exwm/exwm-floating.el
parent533c3dabab62d23bcbcf924c3242e92945e31020 (diff)
parent3e6bfe36afc8356bf72d89eff940282db6ea7cba (diff)
subtree(3p/exwm): update to EXWM 0.30 r/8238
Merge commit '3e6bfe36afc8356bf72d89eff940282db6ea7cba' into HEAD

Change-Id: Ieebca600b409765d9109fd2b718bd74e533c12e1
Diffstat (limited to 'third_party/exwm/exwm-floating.el')
-rw-r--r--third_party/exwm/exwm-floating.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/third_party/exwm/exwm-floating.el b/third_party/exwm/exwm-floating.el
index 34d06a30db09..574a78f01562 100644
--- a/third_party/exwm/exwm-floating.el
+++ b/third_party/exwm/exwm-floating.el
@@ -67,11 +67,11 @@ This hook runs in the context of the corresponding buffer."
 
 (defcustom exwm-floating-border-width 1
   "Border width of floating windows."
-  :type '(integer
-          :validate (lambda (widget)
-                      (when (< (widget-value widget) 0)
-                        (widget-put widget :error "Border width is at least 0")
-                        widget)))
+  :type `(integer
+          :validate ,(lambda (widget)
+                       (when (< (widget-value widget) 0)
+                         (widget-put widget :error "Border width is at least 0")
+                         widget)))
   :initialize #'custom-initialize-default
   :set (lambda (symbol value)
          (let ((delta (- value exwm-floating-border-width))