Cheaply fix box-shadow property to accept inset arg.
This commit is contained in:
parent
92bd82c65f
commit
5ecf6eb422
|
@ -223,7 +223,7 @@ is used as a fallback."
|
|||
(:default (property)
|
||||
(make-property property (format NIL "~{~a~^ ~}" (mapcar #'resolve args)))))
|
||||
|
||||
(define-browser-property box-shadow (x y &optional blur spread color)
|
||||
(define-browser-property box-shadow (inset x y &optional blur spread color)
|
||||
(:default (property)
|
||||
(make-property property (format NIL "~a ~a~@[ ~a~]~@[ ~a~]~@[ ~a~]"
|
||||
(resolve x) (resolve y) (resolve blur) (resolve spread) (resolve color)))))
|
||||
(make-property property (format NIL "~a ~a ~a~@[ ~a~]~@[ ~a~]~@[ ~a~]"
|
||||
(resolve inset) (resolve x) (resolve y) (resolve blur) (resolve spread) (resolve color)))))
|
||||
|
|
Loading…
Reference in New Issue