From 2db78797ee58e53f06bd2d104fb203c45247e7c0 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 29 Oct 2013 13:41:44 -0400
Subject: move code around and rename thread; no functional changes

---
 Assistant/Types/RepoProblem.hs | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 Assistant/Types/RepoProblem.hs

(limited to 'Assistant/Types/RepoProblem.hs')

diff --git a/Assistant/Types/RepoProblem.hs b/Assistant/Types/RepoProblem.hs
new file mode 100644
index 000000000..40397c708
--- /dev/null
+++ b/Assistant/Types/RepoProblem.hs
@@ -0,0 +1,18 @@
+{- git-annex assistant remote problem detection
+ -
+ - Copyright 2013 Joey Hess <joey@kitenet.net>
+ -
+ - Licensed under the GNU GPL version 3 or higher.
+ -}
+
+module Assistant.Types.RepoProblem where
+
+import Types
+import Utility.TList
+
+import Control.Concurrent.STM
+
+type RepoProblemChan = TList UUID
+
+newRepoProblemChan :: IO RepoProblemChan
+newRepoProblemChan = atomically newTList
-- 
cgit v1.2.3