diff --git a/hbs2-peer/app/HttpWorker.hs b/hbs2-peer/app/HttpWorker.hs index 95a549b8..9395a4d4 100644 --- a/hbs2-peer/app/HttpWorker.hs +++ b/hbs2-peer/app/HttpWorker.hs @@ -81,6 +81,8 @@ httpWorker (PeerConfig syn) pmeta e = do Just n -> do json n + -- TODO: key-to-disable-tree-streaming + get "/ref/:key" do void $ flip runContT pure do