mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add a startup notice in the log, with version number

Browse source
This commit is contained in:
Joey Hess 2013-03-17 14:45:24 -04:00
parent b55602ecf5
commit 5040c21fd7
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Assistant.hs
View file

@ -157,6 +157,7 @@ import Assistant.Environment
import qualified Utility.Daemon import qualified Utility.Daemon
import Utility.LogFile import Utility.LogFile
import Utility.ThreadScheduler import Utility.ThreadScheduler
import qualified Build.SysConfig as SysConfig
stopDaemon :: Annex () stopDaemon :: Annex ()
stopDaemon = liftIO . Utility.Daemon.stopDaemon =<< fromRepo gitAnnexPidFile stopDaemon = liftIO . Utility.Daemon.stopDaemon =<< fromRepo gitAnnexPidFile
@ -198,6 +199,7 @@ startDaemon assistant foreground startbrowser = do
=<< newAssistantData st dstatus =<< newAssistantData st dstatus
go webappwaiter = do go webappwaiter = do
notice ["starting", desc, "version", SysConfig.packageversion]
#ifdef WITH_WEBAPP #ifdef WITH_WEBAPP
d <- getAssistant id d <- getAssistant id
urlrenderer <- liftIO newUrlRenderer urlrenderer <- liftIO newUrlRenderer