remove debug code
This commit is contained in:
parent
0c68346f46
commit
4112b317a7
1 changed files with 0 additions and 1 deletions
|
@ -31,7 +31,6 @@ import qualified Data.Text as T
|
||||||
|
|
||||||
upgraderThread :: UrlRenderer -> NamedThread
|
upgraderThread :: UrlRenderer -> NamedThread
|
||||||
upgraderThread urlrenderer = namedThread "Upgrader" $ do
|
upgraderThread urlrenderer = namedThread "Upgrader" $ do
|
||||||
checkUpgrade urlrenderer -- TODO: remove
|
|
||||||
when (isJust Build.SysConfig.upgradelocation) $ do
|
when (isJust Build.SysConfig.upgradelocation) $ do
|
||||||
h <- liftIO . newNotificationHandle False . networkConnectedNotifier =<< getDaemonStatus
|
h <- liftIO . newNotificationHandle False . networkConnectedNotifier =<< getDaemonStatus
|
||||||
go h Nothing
|
go h Nothing
|
||||||
|
|
Loading…
Reference in a new issue