diff --git a/hbs2-peer/app/PeerMain.hs b/hbs2-peer/app/PeerMain.hs
index df01d834..ea95eb54 100644
--- a/hbs2-peer/app/PeerMain.hs
+++ b/hbs2-peer/app/PeerMain.hs
@@ -449,7 +449,7 @@ runPeer :: forall e s . ( e ~ L4Proto
                         , HasStorage (PeerM e IO)
                         ) => PeerOpts -> IO ()
 
-runPeer opts = U.handle (\e -> myException e
+runPeer opts = Exception.handle (\e -> myException e
                         >> performGC
                         >> respawn opts
                         ) $ runResourceT do