fix tricky warning with ghc 8

Whether Route was exported from Assistant.WebApp.Types
or not depended on the version of ghc. So, explictly export it.

diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs
index bc79a70a8d0c7238413dc3f803b85427ff0a7f28..6db66399c5a75221c26367856397b519920b7920 100644 (file)
--- a/Assistant/Alert.hs
+++ b/Assistant/Alert.hs
@@ -26,7 +26,6 @@ import qualified Control.Exception as E
 import Assistant.DaemonStatus
 import Assistant.WebApp.Types
 import Assistant.WebApp (renderUrl)
-import Yesod
 #endif
 import Assistant.Monad
 import Assistant.Types.UrlRenderer

diff --git a/Assistant/WebApp/Types.hs b/Assistant/WebApp/Types.hs
index 1ab0fa306f3a8360ad6a8b1ffdbb3ccd6be27959..6b0eb9413f91f28407f9287365918e229e63217a 100644 (file)
--- a/Assistant/WebApp/Types.hs
+++ b/Assistant/WebApp/Types.hs
@@ -10,7 +10,10 @@
 {-# LANGUAGE FlexibleInstances, FlexibleContexts, ViewPatterns #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
-module Assistant.WebApp.Types where
+module Assistant.WebApp.Types (
+       module Assistant.WebApp.Types,
+       Route
+) where
 
 import Assistant.Common
 import Assistant.Ssh