diff options
author | Joey Hess <joey@kitenet.net> | 2012-06-25 16:10:10 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-06-25 16:10:24 -0400 |
commit | 0b146f9ecc36545478c4a2218981b376828c61db (patch) | |
tree | c7c758fb5421d61e6b286b76ec474dd9b04450df /Assistant | |
parent | 19eee6a1df2a6c724e6d6dbe842b40dc1c17f65b (diff) |
reorg threads
Diffstat (limited to 'Assistant')
-rw-r--r-- | Assistant/Threads/Committer.hs (renamed from Assistant/Committer.hs) | 4 | ||||
-rw-r--r-- | Assistant/Threads/Merger.hs (renamed from Assistant/Merger.hs) | 2 | ||||
-rw-r--r-- | Assistant/Threads/Pusher.hs (renamed from Assistant/Pusher.hs) | 2 | ||||
-rw-r--r-- | Assistant/Threads/SanityChecker.hs (renamed from Assistant/SanityChecker.hs) | 8 | ||||
-rw-r--r-- | Assistant/Threads/Watcher.hs (renamed from Assistant/Watcher.hs) | 2 |
5 files changed, 9 insertions, 9 deletions
diff --git a/Assistant/Committer.hs b/Assistant/Threads/Committer.hs index 0c6999591..488056fa2 100644 --- a/Assistant/Committer.hs +++ b/Assistant/Threads/Committer.hs @@ -5,13 +5,13 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Assistant.Committer where +module Assistant.Threads.Committer where import Common.Annex import Assistant.Changes import Assistant.Commits import Assistant.ThreadedMonad -import Assistant.Watcher +import Assistant.Threads.Watcher import qualified Annex import qualified Annex.Queue import qualified Git.Command diff --git a/Assistant/Merger.hs b/Assistant/Threads/Merger.hs index 988cbd8a6..d2c8b9b76 100644 --- a/Assistant/Merger.hs +++ b/Assistant/Threads/Merger.hs @@ -5,7 +5,7 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Assistant.Merger where +module Assistant.Threads.Merger where import Common.Annex import Assistant.ThreadedMonad diff --git a/Assistant/Pusher.hs b/Assistant/Threads/Pusher.hs index 7504d44c2..de90d4e64 100644 --- a/Assistant/Pusher.hs +++ b/Assistant/Threads/Pusher.hs @@ -5,7 +5,7 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Assistant.Pusher where +module Assistant.Threads.Pusher where import Common.Annex import Assistant.Commits diff --git a/Assistant/SanityChecker.hs b/Assistant/Threads/SanityChecker.hs index b74c9fe5d..4db2a61b2 100644 --- a/Assistant/SanityChecker.hs +++ b/Assistant/Threads/SanityChecker.hs @@ -5,7 +5,7 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Assistant.SanityChecker ( +module Assistant.Threads.SanityChecker ( sanityCheckerThread ) where @@ -15,7 +15,7 @@ import Assistant.DaemonStatus import Assistant.ThreadedMonad import Assistant.Changes import Utility.ThreadScheduler -import qualified Assistant.Watcher +import qualified Assistant.Threads.Watcher as Watcher import Data.Time.Clock.POSIX @@ -79,5 +79,5 @@ check st status changechan = do insanity m = runThreadState st $ warning m addsymlink file s = do insanity $ "found unstaged symlink: " ++ file - Assistant.Watcher.runHandler st status changechan - Assistant.Watcher.onAddSymlink file s + Watcher.runHandler st status changechan + Watcher.onAddSymlink file s diff --git a/Assistant/Watcher.hs b/Assistant/Threads/Watcher.hs index 78330c8d0..1b6ec15f1 100644 --- a/Assistant/Watcher.hs +++ b/Assistant/Threads/Watcher.hs @@ -7,7 +7,7 @@ {-# LANGUAGE CPP #-} -module Assistant.Watcher where +module Assistant.Threads.Watcher where import Common.Annex import Assistant.ThreadedMonad |