From dc60216eb8fe919acf7ab3984a5f0bf0e0193f6b Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 26 Jan 2013 17:09:33 +1100
Subject: webapp: Now allows restarting any threads that crash.

---
 Assistant/Threads/MountWatcher.hs | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'Assistant/Threads/MountWatcher.hs')

diff --git a/Assistant/Threads/MountWatcher.hs b/Assistant/Threads/MountWatcher.hs
index 594035c52..143ae9cee 100644
--- a/Assistant/Threads/MountWatcher.hs
+++ b/Assistant/Threads/MountWatcher.hs
@@ -33,11 +33,8 @@ import qualified Control.Exception as E
 #warning Building without dbus support; will use mtab polling
 #endif
 
-thisThread :: ThreadName
-thisThread = "MountWatcher"
-
 mountWatcherThread :: NamedThread
-mountWatcherThread = NamedThread "MountWatcher" $
+mountWatcherThread = namedThread "MountWatcher" $
 #if WITH_DBUS
 	dbusThread
 #else
-- 
cgit v1.2.3