summaryrefslogtreecommitdiff
path: root/Assistant/Threads/WebApp.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-05-12 19:19:28 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-05-12 19:19:28 -0400
commit1dd4574909b40ffdb77ae1338b353156d73983af (patch)
tree21a2d65e054964e91ba7376fcbca95b33f7f4472 /Assistant/Threads/WebApp.hs
parentb8558b724b302a9db16e9b75ac2cba425ecdc5c1 (diff)
rename module
Diffstat (limited to 'Assistant/Threads/WebApp.hs')
-rw-r--r--Assistant/Threads/WebApp.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Threads/WebApp.hs b/Assistant/Threads/WebApp.hs
index 19300cf3c..3c1e6178a 100644
--- a/Assistant/Threads/WebApp.hs
+++ b/Assistant/Threads/WebApp.hs
@@ -33,7 +33,7 @@ import Assistant.WebApp.Control
import Assistant.WebApp.OtherRepos
import Assistant.Types.ThreadedMonad
import Utility.WebApp
-import Utility.TempFile
+import Utility.Tmp
import Utility.FileMode
import Git
@@ -74,7 +74,7 @@ webAppThread assistantdata urlrenderer noannex listenhost postfirstrun onstartup
, return app
)
runWebApp listenhost app' $ \addr -> if noannex
- then withTempFile "webapp.html" $ \tmpfile _ ->
+ then withTmpFile "webapp.html" $ \tmpfile _ ->
go addr webapp tmpfile Nothing
else do
let st = threadState assistantdata