diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm
index e5e77cb5a..f3b0d1bbf 100644
--- a/module/system/repl/command.scm
+++ b/module/system/repl/command.scm
@@ -324,7 +324,7 @@ List current bindings."
 Change languages."
   (let ((lang (lookup-language name))
         (cur (repl-language repl)))
-    (format #t "Have fun with ~a!  To switch back, type `,L ~a'.\n"
+    (format #t "Happy hacking with ~a!  To switch back, type `,L ~a'.\n"
             (language-title lang) (language-name cur))
     (set! (repl-language repl) lang)))