From 7163a730fd0e0d3fe8069aa98dc42d80a7cdf445 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Tue, 5 Apr 2016 15:56:14 -0700
Subject: [PATCH] tools: shake cleanup, webmanual target fixup

---
 Shake.hs | 25 +++++++++----------------
 1 file changed, 9 insertions(+), 16 deletions(-)

diff --git a/Shake.hs b/Shake.hs
index 734685432..69f476a93 100755
--- a/Shake.hs
+++ b/Shake.hs
@@ -41,17 +41,16 @@ import "time"         Data.Time
 import "directory"    System.Directory as S (getDirectoryContents)
 
 usage = [i|Usage:
- ./Shake.hs compile                     # compile this script (optional)
- ./Shake                                # show commands
- ./Shake --help                         # show options
- ./Shake [--color] COMMAND
-
-Commands:
- compile
- manpages
- webmanual
+ ./Shake.hs compile       # compile this script (optional)
+ ./Shake                  # show commands
+ ./Shake --help           # show options, eg --color
+ ./Shake manpages         # generate nroff files for man
+ ./Shake webmanpages      # generate web man pages for hakyll
 |]
 
+buildDir = ".build"
+pandocExe = "stack exec -- pandoc" -- use the pandoc required above
+pandocFiltersResolver = ""
 manpages = [
    "hledger_csv.5"
   ,"hledger_journal.5"
@@ -67,12 +66,6 @@ manpageDir p
   | '_' `elem` p = "hledger-lib"
   | otherwise    = dropExtension p
 
-buildDir = ".build"
-
-pandocExe = "stack exec -- pandoc" -- use the pandoc required above
-
-pandocFiltersResolver = ""
-
 main = do
 
   pandocFilters <-
@@ -121,7 +114,7 @@ main = do
         "--filter doc/pandoc-capitalize-headers"
         "-o" out
 
-    phony "webmanual" $ need manpageMdsForHakyll
+    phony "webmanpages" $ need manpageMdsForHakyll
 
     manpageMdsForHakyll |%> \out -> do
       let