mirrors/lqml
1
Fork 0
mirror of https://gitlab.com/eql/lqml.git synced 2025-12-06 02:30:38 -08:00
Code Issues Projects Releases Packages Wiki Activity

revision

Browse source
This commit is contained in:
pls.153 2022-03-09 17:51:24 +01:00
parent 1473ec8271
commit ccdf5b328e
2 changed files with 29 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/advanced-qml-auto-reload/readme.md
View file

@ -23,7 +23,7 @@ It adds a QML `SwipeView` with 3 pages, to demonstrate how to reload single
QML pages, without reloading the whole UI. This is important for nested UI
pages, in order to not lose your current view in the UI.
Without the aboce feature, you would always land on the main view after
Without the above feature, you would always land on the main view after
reloading QML.

28
examples/advanced-qml-auto-reload/run.lisp Normal file
View file

@ -0,0 +1,28 @@
(in-package :qml-user)
(require :asdf)
(push (merge-pathnames "./")
asdf:*central-registry*)
(asdf:operate 'asdf:load-source-op :app)
(qset *quick-view*
|x| 75
|y| 75)
(defun option (name)
(find name (ext:command-args) :test 'search))
;;; trivial auto reload of all QML files after saving any change
(when (option "-auto")
(load "lisp/qml-reload/auto-reload"))
;;; for Slime after copying 'lqml-start-swank.lisp' from LQML sources
;;; to your Slime directory, which is assumed to be '~/slime/'
(when (option "-slime")
(load "~/slime/lqml-start-swank")) ; for 'slime-connect' from Emacs
(load "qml/.create-qml-loaders.lisp")