summaryrefslogtreecommitdiffstats
path: root/src/Main.hs
diff options
context:
space:
mode:
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 ()