Put base for new store-load interface.

1 files changed, 17 insertions, 0 deletions

diff --git a/module/vcomponent/data-stores/vdir.scm b/module/vcomponent/data-stores/vdir.scm
new file mode 100644
index 00000000..fca59092
--- /dev/null
+++ b/module/vcomponent/data-stores/vdir.scm
@@ -0,0 +1,17 @@
+(define-module (vcomponent data-stores vdir)
+  :use-module (oop goops)
+  :use-module (vcomponent data-stores common)
+  :use-module ((srfi srfi-88) :select ())
+  :export ())
+
+(define-class <vdir-data-store> (<calendar-data-store>)
+  )
+
+(define-method (get-all (this <vdir-data-store>))
+  '())
+
+(define-method (get-by-uid (this <vdir-data-store>) (uid <string>))
+  #f
+  )
+
+;; (define (get-in-date-interval ))