; Make more lambdas visible to the byte compiler
* exwm-core.el (exwm-mode-menu), exwm-floating.el (exwm-floating-border-width): Make lambdas visible to the byte compiler.
This commit is contained in:
parent
0ef8e04f27
commit
bf921084b4
2 changed files with 14 additions and 14 deletions
|
|
@ -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))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue