--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -754,8 +754,10 @@ to add @var{device} to the kernel's entropy pool.  The service will fail if
                         ;; systemd's vconsole support, let's not treat
                         ;; this as an error.
                         (case (status:exit-val
-                               (system* #$(file-append kbd "/bin/setfont")
-                                        "-C" #$device #$font))
+                               (with-error-to-port (%make-void-port "w")
+                                 (lambda ()
+                                   (system* #$(file-append kbd "/bin/setfont")
+                                            "-C" #$device #$font))))
                           ((0 71) #t)
                           (else #f))))
              (stop #~(const #t))