index master
authorMart Lubbers <mart@martlubbers.net>
Mon, 4 Mar 2019 07:33:45 +0000 (08:33 +0100)
committerMart Lubbers <mart@martlubbers.net>
Mon, 4 Mar 2019 07:33:45 +0000 (08:33 +0100)
index.icl

index d1b4359..95032d1 100644 (file)
--- a/index.icl
+++ b/index.icl
@@ -16,11 +16,13 @@ derive JSONDecode RTree, FileInfo, Tm, MaybeError
 :: MusicDB =
        { mdb_format :: [Format]
        , mdb_tree   :: RTree
 :: MusicDB =
        { mdb_format :: [Format]
        , mdb_tree   :: RTree
-:: Tag =
-       { tag_key   :: !String
-       , tag_value :: !String
        }
 
        }
 
+//:: Tag =
+//     { tag_key   :: !String
+//     , tag_value :: !String
+//     }
+
 dbfile = "db.json"
 root = "/mnt/data/music"
 
 dbfile = "db.json"
 root = "/mnt/data/music"