From e36cb783c46de26c88dc2f4f5d7d44c7cafe93cd Mon Sep 17 00:00:00 2001 From: voidlizard Date: Sat, 23 Aug 2025 19:38:29 +0300 Subject: [PATCH] wip --- hbs2-peer/app/Migrate.hs | 3 --- 1 file changed, 3 deletions(-) diff --git a/hbs2-peer/app/Migrate.hs b/hbs2-peer/app/Migrate.hs index e07e91c8..e09d3297 100644 --- a/hbs2-peer/app/Migrate.hs +++ b/hbs2-peer/app/Migrate.hs @@ -58,14 +58,11 @@ migrate syn = flip runContT pure $ callCC \exit -> do -- KISS. just import block/remove block. -- let the user backup it. -- - -- - -- conf@(PeerConfig se) <- peerConfigRead (headMay [p | ListVal [StringLike "-c", StringLike p] <- opts] ) brains <- newBasicBrains conf - bProbe <- newSimpleProbe "Brains" brainsThread <- ContT $ withAsync $ runBasicBrains conf brains xdg <- liftIO $ getXdgDirectory XdgData defStorePath <&> fromString