diff options
author | 2012-07-20 19:29:59 -0400 | |
---|---|---|
committer | 2012-07-20 19:29:59 -0400 | |
commit | b48d7747a3ac8bea7d58e8fff8faf791f98699c0 (patch) | |
tree | f5662f9161fd3c74c2f6467be270651d92ac3ead /Assistant.hs | |
parent | 42e73537d1977eac2da2760647e9131f5c9b9eed (diff) |
debugging improvements
add timestamps to debug messages
Add lots of debug output in the assistant's threads.
Diffstat (limited to 'Assistant.hs')
-rw-r--r-- | Assistant.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Assistant.hs b/Assistant.hs index dc36957da..4bb1ed4ce 100644 --- a/Assistant.hs +++ b/Assistant.hs @@ -82,7 +82,7 @@ module Assistant where -import Common.Annex +import Assistant.Common import Assistant.ThreadedMonad import Assistant.DaemonStatus import Assistant.Changes @@ -136,6 +136,8 @@ startDaemon assistant foreground , mountWatcherThread st dstatus , watchThread st dstatus transferqueue changechan ] + debug "assistant" + ["all git-annex assistant threads started"] waitForTermination stopDaemon :: Annex () |