* nongnu/home/services/editors.scm altered naming to home convention

added home-* prefix
This commit is contained in:
Fi guadec 2023-12-11 00:30:16 +00:00
parent 2f3ea1fdc2
commit bce6e6eb5f

View File

@ -9,31 +9,31 @@
#:use-module (json)
#:use-module (nongnu packages editors)
#:export (<vscodium-configuration> vscodium-configuration
make-vscodium-configuration
vscodium-configuration?
this-vscodium-configuration
vscodium-configuration-snippets
vscodium-configuration-keybindings
vscodium-configuration-settings
vscodium-configuration-vsix-extensions
#:export (<home-vscodium-configuration> home-vscodium-configuration
make-home-vscodium-configuration
home-vscodium-configuration?
this-home-vscodium-configuration
home-vscodium-configuration-snippets
home-vscodium-configuration-keybindings
home-vscodium-configuration-settings
home-vscodium-configuration-vsix-extensions
vscodium-service-type))
home-vscodium-service-type))
(define-record-type* <vscodium-configuration> vscodium-configuration
make-vscodium-configuration
vscodium-configuration?
this-vscodium-configuration
(snippets vscodium-configuration-snippets
(define-record-type* <home-vscodium-configuration> home-vscodium-configuration
make-home-vscodium-configuration
home-vscodium-configuration?
this-home-vscodium-configuration
(snippets home-vscodium-configuration-snippets
(default (list)))
(keybindings vscodium-configuration-keybindings
(keybindings home-vscodium-configuration-keybindings
(default (vector)))
(settings vscodium-configuration-settings
(settings home-vscodium-configuration-settings
(default (list)))
(vsix-extensions vscodium-configuration-vsix-extensions
(vsix-extensions home-vscodium-configuration-vsix-extensions
(default (list))))
(define vscodium-service-type
(define home-vscodium-service-type
(service-type (name 'vscodium)
(extensions (list (service-extension
home-xdg-configuration-files-service-type
@ -42,11 +42,11 @@
(let ((base "VSCodium/User/"))
`((,(string-append base "keybinds.json") ,
(plain-file "vscodium-keybindings"
(scm->json-string (vscodium-configuration-keybindings
(scm->json-string (home-vscodium-configuration-keybindings
config))))
(,(string-append base "settings.json") ,
(plain-file "vscodium-settings"
(scm->json-string (vscodium-configuration-settings
(scm->json-string (home-vscodium-configuration-settings
config))))
,@(map (lambda (snippetEntry)
(let ((name (car
@ -61,7 +61,7 @@
name)
(scm->json-string
data)))))
(vscodium-configuration-snippets
(home-vscodium-configuration-snippets
config))))))
(service-extension
home-activation-service-type
@ -79,7 +79,7 @@
#~(begin
(define extensionPaths
(list #$@(vscodium-configuration-vsix-extensions
(list #$@(home-vscodium-configuration-vsix-extensions
config)))
(for-each (lambda (extensionPath)
(system* (string-append #$vscodium
@ -89,7 +89,7 @@
extensionPaths))))
(service-extension home-profile-service-type
(const (list vscodium)))))
(default-value (vscodium-configuration))
(default-value (home-vscodium-configuration))
(description
"install vscodium using specified value-(*) for:
snippet-(*)