From 6b2e4ef3a426a2a866ed7eb511ba9ad242e144b3 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Mon, 2 Dec 2013 07:59:26 +0200
Subject: [PATCH] Switch to EMBED_REFRESH

---
 yesod-bin/Devel.hs | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/yesod-bin/Devel.hs b/yesod-bin/Devel.hs
index a6b888c7..4d0e8bdb 100644
--- a/yesod-bin/Devel.hs
+++ b/yesod-bin/Devel.hs
@@ -1,9 +1,7 @@
 {-# LANGUAGE CPP                 #-}
 {-# LANGUAGE OverloadedStrings   #-}
 {-# LANGUAGE ScopedTypeVariables #-}
-#ifdef EMBED_REFRESH
 {-# LANGUAGE TemplateHaskell   #-}
-#endif
 module Devel
     ( devel
     , DevelOpts(..)
@@ -79,11 +77,7 @@ import           Network.Socket                        (sClose)
 import           Network.Wai                           (responseLBS)
 import           Network.Wai.Handler.Warp              (run)
 import           SrcLoc                                (Located)
-#ifdef EMBED_REFRESH
 import           Data.FileEmbed        (embedFile)
-#else
-import           Paths_yesod_bin
-#endif
 
 lockFile :: DevelOpts -> FilePath
 lockFile _opts =  "yesod-devel/devel-terminate"
@@ -128,11 +122,7 @@ cabalProgram opts | isCabalDev opts = "cabal-dev"
 reverseProxy :: DevelOpts -> I.IORef Int -> IO ()
 reverseProxy opts iappPort = do
     manager <- newManager def
-#ifdef EMBED_REFRESH
     let refreshHtml = LB.fromStrict $(embedFile "refreshing.html")
-#else
-    refreshHtml <- liftIO $ getDataFileName "refreshing.html" >>= LB.readFile
-#endif
     let onExc _ _ = return $ responseLBS status200
             [ ("content-type", "text/html")
             , ("Refresh", "1")