display/visibility methods did wrong calls to webview-set-style!
This commit is contained in:
@@ -49,13 +49,13 @@
|
|||||||
(define/public (display . d)
|
(define/public (display . d)
|
||||||
(when (not (null? d))
|
(when (not (null? d))
|
||||||
(let ((d* (string->symbol (format "~a" (car d)))))
|
(let ((d* (string->symbol (format "~a" (car d)))))
|
||||||
(webview-set-style! wv element-id 'display d*)))
|
(webview-set-style! wv element-id (list 'display d*))))
|
||||||
(webview-get-style wv element-id 'display))
|
(webview-get-style wv element-id 'display))
|
||||||
|
|
||||||
(define/public (visibility . v)
|
(define/public (visibility . v)
|
||||||
(when (not (null? v))
|
(when (not (null? v))
|
||||||
(let ((v* (string->symbol (format "~a" (car v)))))
|
(let ((v* (string->symbol (format "~a" (car v)))))
|
||||||
(webview-set-style! wv element-id 'visibility v*)))
|
(webview-set-style! wv element-id (list 'visibility v*))))
|
||||||
(webview-get-style wv element-id 'visibility))
|
(webview-get-style wv element-id 'visibility))
|
||||||
|
|
||||||
(define/public (set-style! styles)
|
(define/public (set-style! styles)
|
||||||
|
|||||||
Reference in New Issue
Block a user