diff --git a/guix/profiles.scm b/guix/profiles.scm
index 011bc54d23a..d8b83bf7305 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -1268,8 +1268,11 @@ are cross-built for TARGET."
                          (guix search-paths)
                          (srfi srfi-1))
 
-            (setvbuf (current-output-port) 'line)
-            (setvbuf (current-error-port) 'line)
+            ;; Don't complain about _IO* on Guile 2.2.
+            (debug-disable 'warn-deprecated)
+
+            (setvbuf (current-output-port) _IOLBF)
+            (setvbuf (current-error-port) _IOLBF)
 
             #+(if locales? set-utf8-locale #t)