home-environments: radio: Use mime-type lists from (radio mime-types)

main
Luis Guilherme Coelho 2024-11-25 18:33:58 -03:00
parent 54004bf4bc
commit bc43456bcd
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 8 additions and 46 deletions

View File

@ -28,6 +28,7 @@
#|Radio|# #|Radio|#
#|C|# #:use-module ((radio channels) #:prefix channel:) #|C|# #:use-module ((radio channels) #:prefix channel:)
#|P|# #:use-module ((radio packages) #:prefix packages:) #|P|# #:use-module ((radio packages) #:prefix packages:)
#|M|# #:use-module ((radio mime-types) #:prefix mime-types:)
#|S|# #:use-module ((radio shepherd-services) #:prefix shepherd-service:) #|S|# #:use-module ((radio shepherd-services) #:prefix shepherd-service:)
#|Radix|# #|Radix|#
@ -82,52 +83,13 @@
(service home-xdg-mime-applications-service-type (service home-xdg-mime-applications-service-type
(home-xdg-mime-applications-configuration (home-xdg-mime-applications-configuration
(default (associate-right (default (associate-right
('chromium.desktop ('chromium.desktop mime-types:browser)
`("application/xhtml+xml" ('kak.desktop mime-types:editor)
"application/x-extension-htm" ('lf.desktop mime-types:file-manager)
"application/x-extension-xhtml" ('mpv.desktop (append mime-types:audio
"application/x-extension-xht" mime-types:video))
"x-scheme-handler/http" ('imv.desktop mime-types:image)
"x-scheme-handler/https")) ('sioyek.desktop mime-types:document)))))
('kak.desktop
`("text/html"
"text/plain"
"text/troff"
"text/xml"
"text/x-c"
"text/x-c++"
"text/x-clojure"
"text/x-diff"
"text/x-lisp"
"text/x-scheme"
"text/x-script.python"
"text/x-shellscript"
"text/x-tex"))
('lf.desktop
`("inode/directory"
"x-scheme-handler/ftp"
"x-scheme-handler/nfs"
"x-scheme-handler/smb"
"x-scheme-handler/ssh"
"application/x-directory"))
('mpv.desktop
`("image/gif"
"audio/mpeg"
"audio/ogg"
"audio/opus"
"audio/x-opus+ogg"
"video/mp4"
"video/x-matroska"
"video/webm"))
('imv.desktop
`("image/avif"
"image/bmp"
"image/jpeg"
"image/png"
"image/svg+xml"
"image/webp"))
('sioyek.desktop
`("application/pdf"))))))
(service home-special-files-service-type (service home-special-files-service-type
`((".config/guix/home.scm" ,radio.scm))) `((".config/guix/home.scm" ,radio.scm)))