mirrors/EQL5
1
Fork 0
mirror of https://gitlab.com/eql/EQL5.git synced 2025-12-06 10:31:19 -08:00
Code Issues Projects Releases Packages Wiki Activity

add new function QVARIANT-FROM-VALUE, needed in QML:QML-SET ("quick" examples)

Browse source
This commit is contained in:
polos 2017-01-21 22:40:08 +01:00
parent 881939b2d9
commit b33a987248
10 changed files with 31 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/M-modules/quick/qml-lisp/qml-lisp.lisp
View file

@ -100,7 +100,7 @@
(find-qml-object object-name)
property-name))
(x:when-it (|propertyTypeName| property)
(qlet ((variant (qnew (format nil "QVariant(~A)" x:it) value)))
(qlet ((variant (qvariant-from-value value x:it)))
(|write| property variant)))))
;;; JS