From b319be142404d2e86911c3f65896163b0aa04b7a Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Tue, 8 Oct 2019 22:12:38 +0200
Subject: Hide REPL welcome message.

---
 guile-studio-configure.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/guile-studio-configure.scm b/guile-studio-configure.scm
index 93fed31..f201da6 100644
--- a/guile-studio-configure.scm
+++ b/guile-studio-configure.scm
@@ -256,7 +256,9 @@ exec ~a/bin/emacs -Q --load ~a/guile-studio.el
        (make-guile-studio-wrapper prefix share emacsdir)
        (with-output-to-file (string-append share "/guile-studio-init")
          (lambda ()
-           (format #t "~s" '(use-modules (pict))))))
+           (format #t "~s" '(begin
+                              (set! (@@ (system repl common) repl-welcome) (const #t))
+                              (use-modules (pict))))))
      #t)
     ((script . _)
      (format (current-error-port)
-- 
cgit v1.2.3