diff --git a/ice-9/session.scm b/ice-9/session.scm
index 25cd6e8dc..e909132bc 100644
--- a/ice-9/session.scm
+++ b/ice-9/session.scm
@@ -32,10 +32,12 @@
   "(help [NAME])
 Prints useful information.  Try `(help)'."
   (cond ((not (= (length exp) 1))
-         (help-usage))
+         (help-usage)
+         '(begin))
         ((not (provided? 'regex))
          (display "`help' depends on the `regex' feature.
-You don't seem to have regular expressions installed.\n"))
+You don't seem to have regular expressions installed.\n")
+         '(begin))
         (else
          (let ((name (car exp))
                (not-found (lambda (type x)