diff --git a/src/Settings.hs b/src/Settings.hs
index 02421732f..c9fbcd7e3 100644
--- a/src/Settings.hs
+++ b/src/Settings.hs
@@ -193,7 +193,7 @@ deriveFromJSON
 instance FromJSON HaskellNet.PortNumber where
   parseJSON = withScientific "PortNumber" $ \sciNum -> case toBoundedInteger sciNum of
     Just int -> return $ fromIntegral (int :: Word16)
-    Nothing -> fail "Expected whole number to denote port"
+    Nothing -> fail "Expected whole number of plausible size to denote port"
 
 deriveFromJSON
   defaultOptions