mirrors/lqml
1
Fork 0
mirror of https://gitlab.com/eql/lqml.git synced 2026-01-04 08:11:52 -08:00
Code Issues Projects Releases Packages Wiki Activity

revisions

Browse source
This commit is contained in:
pls.153 2023-08-27 18:29:17 +02:00
parent ff3022db4a
commit 9453b7dc7d
3 changed files with 10 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
examples/meshtastic/lisp/upload-download.lisp
View file

@ -93,7 +93,7 @@ it saves uploaded files on the server."
(save-file (get-stream (get-http-connection http-request)) (save-file (get-stream (get-http-connection http-request))
(parse-integer (cdr (assoc :content-length headers))) (parse-integer (cdr (assoc :content-length headers)))
boundary) boundary)
(loc:check-offline-map) ; evtl. tiles to extract (loc:extract-map-bin t) ; evtl. tiles to extract
;; if uploaded file is app:*backup-data-file*, unzip data, close app ;; if uploaded file is app:*backup-data-file*, unzip data, close app
;; (restart needed) ;; (restart needed)
(let ((data.zip (x:cc "data/" app:*backup-data-file*))) (let ((data.zip (x:cc "data/" app:*backup-data-file*)))

8
examples/meshtastic/qml/ext/MenuItem.qml Normal file
View file

@ -0,0 +1,8 @@
import QtQuick 2.15
import QtQuick.Controls 2.15
MenuItem {
font.family: fontText.name
font.pixelSize: 18
}

2
examples/meshtastic/qml/main.qml
View file

@ -18,7 +18,7 @@ Item {
Menu { Menu {
id: menu id: menu
MenuItem { Ext.MenuItem {
text: qsTr("Make backup") text: qsTr("Make backup")
onTriggered: Lisp.call("app:make-backup") onTriggered: Lisp.call("app:make-backup")
enabled: !mobile enabled: !mobile