voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

default bootstrap hardcode

This commit is contained in:
Dmitry Zuikov 2023-02-23 07:04:10 +03:00
parent 12231d2e4d
commit e8b87666e6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-peer/app/Bootstrap.hs
View File

@ -44,7 +44,7 @@ bootstrapDnsLoop conf = do
forever do forever do
debug "I'm a bootstrapLoop" debug "I'm a bootstrapLoop"
let dns = cfgValue @PeerDnsBootStrapKey conf :: Set String let dns = cfgValue @PeerDnsBootStrapKey conf <> Set.singleton "bootstrap.hbs2.net"
for_ (Set.toList dns) $ \dn -> do for_ (Set.toList dns) $ \dn -> do
debug $ "bootstrapping from" <+> pretty dn debug $ "bootstrapping from" <+> pretty dn