From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 15 Nov 2016 22:51:07 +0000 (-0400)
Subject: fix tricky warning with ghc 8
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~283^2~27
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=69915c6c9b5e41d600de052e870535845abbde96;p=git-annex.git

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 bc79a70a8d..6db66399c5 100644
--- 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 1ab0fa306f..6b0eb9413f 100644
--- 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