mirror of
https://codeberg.org/hako/Rosenthal.git
synced 2026-04-28 04:34:21 +00:00
rosenthal: %rosenthal-skeletons: Compute .cache/noctalia/shell-state.json.
* modules/rosenthal/services/desktop.scm (%rosenthal-skeletons) [.cache/noctalia/shell-state.json]: Replace to computed-file.
This commit is contained in:
parent
e17628ab79
commit
9e52e49acb
@ -1,8 +0,0 @@
|
|||||||
{
|
|
||||||
"changelogState": {
|
|
||||||
"lastSeenVersion": "v4.4.3"
|
|
||||||
},
|
|
||||||
"telemetry": {
|
|
||||||
"instanceId": ""
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@ -35,6 +35,7 @@
|
|||||||
#:use-module (gnu packages fcitx5)
|
#:use-module (gnu packages fcitx5)
|
||||||
#:use-module (gnu packages fonts)
|
#:use-module (gnu packages fonts)
|
||||||
#:use-module (gnu packages gnome)
|
#:use-module (gnu packages gnome)
|
||||||
|
#:use-module (gnu packages guile)
|
||||||
#:use-module (gnu packages linux)
|
#:use-module (gnu packages linux)
|
||||||
#:use-module (gnu packages networking)
|
#:use-module (gnu packages networking)
|
||||||
#:use-module (gnu packages polkit)
|
#:use-module (gnu packages polkit)
|
||||||
@ -587,7 +588,20 @@ gtk-key-theme-name = ~a~%"
|
|||||||
,(local-file "../examples/dot-config/xfce4/helpers.rc"))
|
,(local-file "../examples/dot-config/xfce4/helpers.rc"))
|
||||||
;; Prevent Noctalia shell initial screen.
|
;; Prevent Noctalia shell initial screen.
|
||||||
(".cache/noctalia/shell-state.json"
|
(".cache/noctalia/shell-state.json"
|
||||||
,(local-file "../examples/dot-cache/noctalia/shell-state.json"))
|
,(computed-file "noctalia-shell-state.json"
|
||||||
|
(with-extensions (list guile-json-4)
|
||||||
|
#~(begin
|
||||||
|
(use-modules (json))
|
||||||
|
(call-with-output-file #$output
|
||||||
|
(lambda (port)
|
||||||
|
(scm->json
|
||||||
|
`(("changelogState"
|
||||||
|
("lastSeenVersion"
|
||||||
|
. ,(string-append "v" #$(package-version noctalia-shell))))
|
||||||
|
("telemetry"
|
||||||
|
("instanceId" . "")))
|
||||||
|
port
|
||||||
|
#:pretty #t)))))))
|
||||||
|
|
||||||
;; Selected from the default skeletons.
|
;; Selected from the default skeletons.
|
||||||
(".config/gdb/gdbinit" ,%default-gdbinit)
|
(".config/gdb/gdbinit" ,%default-gdbinit)
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user