Commit a3701d7a authored by Kristof Korwisi's avatar Kristof Korwisi
Browse files

Comment out unused variables to remove warning message

parent d3f74338
......@@ -136,17 +136,17 @@ main = do
markdownToHtmlPage src out
--
indexSource <.> "generated" %> \out -> do
deckSources <- deckSourcesA
pageSources <- pageSourcesA
-- deckSources <- deckSourcesA
-- pageSources <- pageSourcesA
decks <- decksA
decksPdf <- decksPdfA
pagesPdf <- pagesPdfA
handouts <- handoutsA
handoutsPdf <- handoutsPdfA
pages <- pagesA
let deckData =
transpose [deckSources, decks, handouts, decksPdf, handoutsPdf]
let pageData = transpose [pageSources, pages, pagesPdf]
-- let deckData =
-- transpose [deckSources, decks, handouts, decksPdf, handoutsPdf]
-- let pageData = transpose [pageSources, pages, pagesPdf]
need $ decks ++ handouts ++ pages
writeIndexLists
out
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment