From a7cf43b34976ac230e4cbead28990f9823c35f7b Mon Sep 17 00:00:00 2001
From: Viktor Kleen <viktor@kleen.org>
Date: Fri, 2 Jan 2015 13:12:04 +0000
Subject: remove redundant add-math-kleen-org.hs

---
 build/add-math-kleen-org.hs | 13 -------------
 1 file changed, 13 deletions(-)
 delete mode 100755 build/add-math-kleen-org.hs

(limited to 'build')

diff --git a/build/add-math-kleen-org.hs b/build/add-math-kleen-org.hs
deleted file mode 100755
index e564149..0000000
--- a/build/add-math-kleen-org.hs
+++ /dev/null
@@ -1,13 +0,0 @@
-#!/usr/bin/env runhaskell
-
-import Data.Map
-import Text.Pandoc.Pretty
-import Text.Pandoc.JSON
-import System.IO
-
-add_title :: Pandoc -> Pandoc
-add_title (Pandoc m bs) = Pandoc (add_title' m) bs
-  where add_title' m@(Meta map) = Meta $ insert "title" (MetaInlines $ [Link [Str "math.kleen.org:"] ("/","math.kleen.org"), Space] ++ docTitle m) map
-
-main :: IO ()
-main = toJSONFilter add_title
-- 
cgit v1.2.3