From 54004bf4bce1376df6920a1525b0b4eb027200d8 Mon Sep 17 00:00:00 2001
From: Luis Guilherme Coelho <lgcoelho@disroot.org>
Date: Mon, 25 Nov 2024 18:32:59 -0300
Subject: [PATCH] radio: Add mime-types

---
 home-environments/radio/mime-types.scm | 56 ++++++++++++++++++++++++++
 1 file changed, 56 insertions(+)
 create mode 100644 home-environments/radio/mime-types.scm

diff --git a/home-environments/radio/mime-types.scm b/home-environments/radio/mime-types.scm
new file mode 100644
index 0000000..603ef3d
--- /dev/null
+++ b/home-environments/radio/mime-types.scm
@@ -0,0 +1,56 @@
+(define-module (radio mime-types)
+  #:export (browser editor file-manager audio video image document))
+
+(define browser
+  `("application/xhtml+xml"
+    "application/x-extension-htm"
+    "application/x-extension-xhtml"
+    "application/x-extension-xht"
+    "x-scheme-handler/http"
+    "x-scheme-handler/https"))
+
+(define editor
+  `("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"))
+
+(define file-manager
+  `("inode/directory"
+    "x-scheme-handler/ftp"
+    "x-scheme-handler/nfs"
+    "x-scheme-handler/smb"
+    "x-scheme-handler/ssh"
+    "application/x-directory"))
+
+(define audio
+  `("video/mp4"
+    "video/x-matroska"
+    "video/webm"))
+
+(define video
+  `("audio/mpeg"
+    "audio/ogg"
+    "audio/opus"
+    "audio/x-opus+ogg"))
+
+(define image
+  `("image/avif"
+    "image/bmp"
+    "image/gif"
+    "image/jpeg"
+    "image/png"
+    "image/svg+xml"
+    "image/webp"))
+
+(define document
+  `("application/pdf"))