diff --git a/cabal-install/src/Distribution/Client/GenBounds.hs b/cabal-install/src/Distribution/Client/GenBounds.hs
index c0f9080df79..d82387cc015 100644
--- a/cabal-install/src/Distribution/Client/GenBounds.hs
+++ b/cabal-install/src/Distribution/Client/GenBounds.hs
@@ -40,7 +40,7 @@ import Distribution.Simple.PackageDescription
 import Distribution.Simple.Program
          ( ProgramDb )
 import Distribution.Simple.Utils
-         ( tryFindPackageDesc )
+         ( notice, tryFindPackageDesc )
 import Distribution.System
          ( Platform )
 import Distribution.Version
@@ -118,11 +118,11 @@ genBounds verbosity packageDBs repoCtxt comp platform progdb globalFlags freezeF
 
        let padTo = maximum $ map (length . unPackageName . packageName) pkgs
 
-       if null thePkgs then putStrLn
+       if null thePkgs then notice verbosity
          "Congratulations, all your dependencies have upper bounds!"
         else do
-         putStrLn boundsNeededMsg
-         traverse_ (putStrLn . (++",") . showBounds padTo) thePkgs
+         notice verbosity boundsNeededMsg
+         traverse_ (notice verbosity . (++",") . showBounds padTo) thePkgs
 
 depName :: Dependency -> String
 depName (Dependency pn _ _) = unPackageName pn
diff --git a/cabal-testsuite/PackageTests/GenBounds/Issue6290/cabal.out b/cabal-testsuite/PackageTests/GenBounds/Issue6290/cabal.out
index d20e396c569..08a8512a6df 100644
--- a/cabal-testsuite/PackageTests/GenBounds/Issue6290/cabal.out
+++ b/cabal-testsuite/PackageTests/GenBounds/Issue6290/cabal.out
@@ -1,2 +1,3 @@
 # cabal gen-bounds
 Resolving dependencies...
+Congratulations, all your dependencies have upper bounds!