diff --git a/collects/lang/private/teach.rkt b/collects/lang/private/teach.rkt
index f3c199e451..b01dccbc6c 100644
--- a/collects/lang/private/teach.rkt
+++ b/collects/lang/private/teach.rkt
@@ -2515,7 +2515,7 @@
       (syntax-case stx ()
 	[(_)
 	 (teach-syntax-error
-	  'begin
+	  'begin0
 	  stx
 	  #f
 	  "expected at least one expression after begin0, but nothing's there")]
diff --git a/collects/tests/htdp-lang/advanced.rktl b/collects/tests/htdp-lang/advanced.rktl
index 2b2a72c400..0a82c83f47 100644
--- a/collects/tests/htdp-lang/advanced.rktl
+++ b/collects/tests/htdp-lang/advanced.rktl
@@ -55,7 +55,7 @@
 (htdp-top-pop 1)
 
 (htdp-syntax-test #'begin0 "begin0: expected an open parenthesis before begin0, but found none")
-(htdp-syntax-test #'(begin0) "begin: expected at least one expression after begin0, but nothing's there")
+(htdp-syntax-test #'(begin0) "begin0: expected at least one expression after begin0, but nothing's there")
 
 (htdp-test 1 'begin0 (begin0 1))
 (htdp-test 2 'begin0 (begin0 2 1))
diff --git a/collects/tests/htdp-lang/beginner.rktl b/collects/tests/htdp-lang/beginner.rktl
index f428cf75e7..fdfb8eb9c4 100644
--- a/collects/tests/htdp-lang/beginner.rktl
+++ b/collects/tests/htdp-lang/beginner.rktl
@@ -97,5 +97,4 @@
 (htdp-syntax-test #''(1 2) "quote: expected the name of the symbol after the quote, but found a part")
 (htdp-syntax-test #'''a "quote: expected the name of the symbol after the quote, but found a part")
 
-
-
+(report-errs)