From 91114700f4888f7bda5ff067fb5a4cb9111ac1b2 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 12 Mar 2013 06:45:56 -0400
Subject: tweak

---
 Assistant.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/Assistant.hs b/Assistant.hs
index 98e156175..0b89369b0 100644
--- a/Assistant.hs
+++ b/Assistant.hs
@@ -178,7 +178,7 @@ startDaemon assistant foreground startbrowser = do
 			origerr <- liftIO $ catchMaybeIO $ 
 				fdToHandle =<< dup stdError
 			liftIO $ Utility.LogFile.redirLog logfd
-			showStart (if assistant then "assistant" else "watch") "."
+			showStart "." desc
 			start id $ 
 				case startbrowser of
 					Nothing -> Nothing
@@ -186,6 +186,9 @@ startDaemon assistant foreground startbrowser = do
 		else
 			start (Utility.Daemon.daemonize logfd (Just pidfile) False) Nothing
   where
+  	desc
+		| assistant = "assistant"
+		| otherwise = "watch"
 	start daemonize webappwaiter = withThreadState $ \st -> do
 		checkCanWatch
 		when assistant $ checkEnvironment
-- 
cgit v1.2.3