1 files changed, 4 insertions, 0 deletions

diff --git a/src/Network/BitTorrent/Core/Node.hs b/src/Network/BitTorrent/Core/Node.hs
index 03f01ed0..da96ca43 100644
--- a/src/Network/BitTorrent/Core/Node.hs
+++ b/src/Network/BitTorrent/Core/Node.hs
@@ -122,6 +122,10 @@ data NodeAddr a = NodeAddr
 
 $(deriveJSON omitRecordPrefix ''NodeAddr)
 
+-- | @127.0.0.1:6882@
+instance Default (NodeAddr IPv4) where
+  def = "127.0.0.1:6882"
+
 -- | KRPC compatible encoding.
 instance Serialize a => Serialize (NodeAddr a) where
   get = NodeAddr <$> get <*> get