From 6c6e6d4caaf4c339c9e5a2a57110ee9b9d1d031f Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Wed, 25 May 2011 00:45:52 +0000
Subject: [PATCH] web: Controller -> AppRun

---
 hledger-web/{Controller.hs => AppRun.hs} | 2 +-
 hledger-web/hledger-web.cabal            | 2 +-
 hledger-web/hledger-web.hs               | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)
 rename hledger-web/{Controller.hs => AppRun.hs} (98%)

diff --git a/hledger-web/Controller.hs b/hledger-web/AppRun.hs
similarity index 98%
rename from hledger-web/Controller.hs
rename to hledger-web/AppRun.hs
index 0726f540c..f4c9a3ec8 100644
--- a/hledger-web/Controller.hs
+++ b/hledger-web/AppRun.hs
@@ -2,7 +2,7 @@
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
-module Controller
+module AppRun
     ( withApp
     , withDevelApp
     ) where
diff --git a/hledger-web/hledger-web.cabal b/hledger-web/hledger-web.cabal
index 4a4d032c9..b8941d5a6 100644
--- a/hledger-web/hledger-web.cabal
+++ b/hledger-web/hledger-web.cabal
@@ -101,7 +101,7 @@ library
     else
         Buildable: False
     exposed-modules: 
-                     Controller
+                     AppRun
     other-modules:
                      App
                      EmbeddedFiles
diff --git a/hledger-web/hledger-web.hs b/hledger-web/hledger-web.hs
index 5655fedb0..37ff6cc4b 100644
--- a/hledger-web/hledger-web.hs
+++ b/hledger-web/hledger-web.hs
@@ -8,7 +8,6 @@ Released under GPL version 3 or later.
 module Main
 where
 
-import Controller (withApp)
 import Network.Wai.Handler.Warp (run)
 #if PRODUCTION
 #else
@@ -30,6 +29,7 @@ import Hledger.Data
 import Hledger.Data.UTF8 (putStr, putStrLn)
 
 import App
+import AppRun (withApp)
 import EmbeddedFiles (createFilesIfMissing)
 import Settings (defhost, defport, datadir, staticdir) -- , browserstartdelay)