1 files changed, 0 insertions, 15 deletions
diff --git a/src/tools/MkToday.hs b/src/tools/MkToday.hs
deleted file mode 100644
index 1a15de2b5..000000000
--- a/src/tools/MkToday.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-module Main where
-
-import System
-
-main :: IO ()
-main = do
-  system "date >foo.tmp"
-  d0 <- readFile "foo.tmp"
-  let d = head $ lines d0
-  writeFile "Today.hs" $ mkToday d
-  system "rm foo.tmp"
-  return ()
-
-mkToday d = "module Today where today = \"" ++ d ++ "\"\n"
-