API: move `src` to `ss`

3 files changed, 28 insertions, 0 deletions

diff --git a/ss/as/atom.scm b/ss/as/atom.scm
new file mode 100644
index 0000000..c089974
--- /dev/null
+++ b/ss/as/atom.scm
@@ -0,0 +1,10 @@
+(define-module (ss as atom)
+  #:use-module ((ss atom) #:prefix atom:)
+  #:use-module (ss dates)
+  #:declarative? #f)
+
+(define main atom:feed)
+(define post atom:entry)
+(define person atom:person)
+(define media atom:media)
+
diff --git a/ss/as/html.scm b/ss/as/html.scm
new file mode 100644
index 0000000..743a77c
--- /dev/null
+++ b/ss/as/html.scm
@@ -0,0 +1,9 @@
+(define-module (ss as html)
+  #:use-module (ss dates)
+  #:use-module ((ss html) #:prefix html:)
+  #:declarative? #f)
+
+(define main html:index)
+(define post html:post)
+(define person html:person)
+(define media html:media)
diff --git a/ss/as/media-list.scm b/ss/as/media-list.scm
new file mode 100644
index 0000000..ca07829
--- /dev/null
+++ b/ss/as/media-list.scm
@@ -0,0 +1,9 @@
+(define-module (ss as media-list)
+  #:use-module (ss dates)
+  #:use-module ((ss media-list) #:prefix media-list:)
+  #:declarative? #f)
+
+(define main media-list:media-list)
+(define post media-list:ignore)
+(define person media-list:ignore)
+(define media media-list:add-to-list)