From a1ed7b9f9954618e2ed4e14dd2dd3215ba7afd7d Mon Sep 17 00:00:00 2001
From: Ekaitz Zarraga <ekaitz@elenq.tech>
Date: Tue, 7 Oct 2025 15:15:58 +0200
Subject: API: move `src` to `ss`

---
 ss/media-list.scm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 ss/media-list.scm

(limited to 'ss/media-list.scm')

diff --git a/ss/media-list.scm b/ss/media-list.scm
new file mode 100644
index 0000000..8e49e9b
--- /dev/null
+++ b/ss/media-list.scm
@@ -0,0 +1,14 @@
+(define-module (ss media-list)
+  #:use-module (ice-9 format)
+  #:export (ignore
+            media-list
+            add-to-list))
+
+(define %media '())
+
+(define (ignore . rest) #f)
+
+(define* (add-to-list path #:key (uri  "") #:allow-other-keys)
+ (set! %media (append! %media (list (cons path uri)))))
+
+(define (media-list . rest) %media)
-- 
cgit v1.2.3