summaryrefslogtreecommitdiffstats
path: root/src/Main.hs
diff options
context:
space:
mode:
authorYann Herklotz <git@yannherklotz.com>2023-05-12 21:45:42 +0100
committerYann Herklotz <git@yannherklotz.com>2023-05-12 21:45:42 +0100
commit6b1efad0b1d4bc6bf6db2892fd6a55d82c600f07 (patch)
treeec5ade0c90bfc2e0cd1e6a407c6c04d9534e9a5c /src/Main.hs
parent3f37dce9fcbdc4127415e71f04fb9bd4ed8224d9 (diff)
downloadzk-visual-6b1efad0b1d4bc6bf6db2892fd6a55d82c600f07.tar.gz
zk-visual-6b1efad0b1d4bc6bf6db2892fd6a55d82c600f07.zip
Add support for categories and tags
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs13
1 files changed, 7 insertions, 6 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 8789ac2..b66d2ab 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -202,14 +202,15 @@ import Zettel
main :: IO ()
main = do
let fl =
- [ "/home/ymherklotz/Dropbox/zk/verification.org",
- "/home/ymherklotz/Dropbox/zk/mathematics.org",
- "/home/ymherklotz/Dropbox/zk/hls.org",
- "/home/ymherklotz/Dropbox/zk/computing.org",
- "/home/ymherklotz/Dropbox/zk/hardware.org"
+ [ (3, "/Users/ymherklotz/Dropbox/zk/verification.org"),
+ (4, "/Users/ymherklotz/Dropbox/zk/mathematics.org"),
+ (1, "/Users/ymherklotz/Dropbox/zk/hls.org"),
+ (2, "/Users/ymherklotz/Dropbox/zk/computing.org"),
+ (5, "/Users/ymherklotz/Dropbox/zk/hardware.org"),
+ (6, "/Users/ymherklotz/Dropbox/zk/general.org")
]
graph' <- parseZettelKasten fl
let graph = transcludeMdAll graph'
let linkedGraph = linkAll graph
- renderZettelGraphFile "../zettelkasten/content/zettel" linkedGraph
+ renderZettelGraphFile "../zk-web/content/zettel" linkedGraph
return ()