Audio embedding

srid · Feb 6, 2023 · c59826b · c59826b
1 parent 66dad06
commit c59826b
Show file tree

Hide file tree

Showing 4 changed files with 24 additions and 0 deletions.
diff --git a/default/templates/filters/embed-audio.tpl b/default/templates/filters/embed-audio.tpl
@@ -0,0 +1,5 @@
+<audio controls preload="metadata" src="${ema:url}">
+  Your browser doesn't support HTML5 audio. Here is a
+  <a class="text-${theme}-600 hover:underline" href="${ema:url}">link to the audio</a>
+  instead.
+</audio>
diff --git a/docs/guide/markdown/cat.ogg b/docs/guide/markdown/cat.ogg
diff --git a/docs/guide/markdown/embed.md b/docs/guide/markdown/embed.md
@@ -37,6 +37,11 @@ The following is the result of using `![[death-note.mp4]]` (note that `![](death
 
 ![[death-note.mp4]]
 
+### Audio
+
+The following is the result of using `![[cat.ogg]]` (note that `![](cat.ogg)` also works).
+
+![[cat.ogg]]
 
 ### PDFs
 

diff --git a/src/Emanote/Pandoc/Renderer/Embed.hs b/src/Emanote/Pandoc/Renderer/Embed.hs
@@ -86,6 +86,9 @@ embedStaticFileRoute model altText staticFile = do
       | any (`T.isSuffixOf` toText fp) videoExts -> do
           pure . runEmbedTemplate "video" $ do
             "ema:url" ## HI.textSplice url
+      | any (`T.isSuffixOf` toText fp) audioExts -> do
+          pure . runEmbedTemplate "audio" $ do
+            "ema:url" ## HI.textSplice url
       | ".pdf" `T.isSuffixOf` toText fp -> do
           pure . runEmbedTemplate "pdf" $ do
             "ema:url" ## HI.textSplice url
@@ -108,3 +111,14 @@ videoExts =
   , ".webm"
   , ".ogv"
   ]
+
+audioExts :: [Text]
+audioExts =
+  [ ".aac"
+  , ".caf"
+  , ".flac"
+  , ".mp3"
+  , ".ogg"
+  , ".wav"
+  , ".wave"
+  ]