diff --git a/collects/deinprogramm/scribblings/DMdA-beginner.scrbl b/collects/deinprogramm/scribblings/DMdA-beginner.scrbl
index 5b3f51cf21..5037758174 100644
--- a/collects/deinprogramm/scribblings/DMdA-beginner.scrbl
+++ b/collects/deinprogramm/scribblings/DMdA-beginner.scrbl
@@ -11,7 +11,7 @@ This is documentation for the language level @italic{Die Macht der
 Abstraktion - Anfänger} to go with the German textbook @italic{Die
 Macht der Abstraktion}.
 
-@declare-exporting[deinprogramm/DMdA-beginner]
+@declare-exporting[deinprogramm/DMdA-beginner #:use-sources (deinprogramm/DMdA deinprogramm/define-record-procedures)]
 
 @schemegrammar*-DMdA[
 #:literals ()
diff --git a/collects/deinprogramm/tests/test-docs-complete.rkt b/collects/deinprogramm/tests/test-docs-complete.rkt
index abf5b83958..60b4c7afc0 100644
--- a/collects/deinprogramm/tests/test-docs-complete.rkt
+++ b/collects/deinprogramm/tests/test-docs-complete.rkt
@@ -1,24 +1,21 @@
 #lang racket/base
 (require tests/utils/docs-complete)
-(check-docs (quote deinprogramm/world))
-(check-docs (quote deinprogramm/turtle))
-(check-docs (quote deinprogramm/test-suite))
-(check-docs (quote deinprogramm/syntax-checkers))
-(check-docs (quote deinprogramm/run-dmda-code))
-(check-docs (quote deinprogramm/line3d))
-(check-docs (quote deinprogramm/line3d))
-(check-docs (quote deinprogramm/image))
-(check-docs (quote deinprogramm/DMdA))
-(check-docs (quote deinprogramm/DMdA-vanilla))
-(check-docs (quote deinprogramm/DMdA-vanilla-reader))
-(check-docs (quote deinprogramm/DMdA-reader))
-(check-docs (quote deinprogramm/DMdA-beginner))
-(check-docs (quote deinprogramm/DMdA-beginner-reader))
-(check-docs (quote deinprogramm/DMdA-assignments))
-(check-docs (quote deinprogramm/DMdA-assignments-reader))
-(check-docs (quote deinprogramm/DMdA-advanced))
-(check-docs (quote deinprogramm/DMdA-advanced-reader))
-(check-docs (quote deinprogramm/define-record-procedures))
-(check-docs (quote deinprogramm/define-record-procedures))
-(check-docs (quote deinprogramm/convert-explicit))
-(check-docs (quote deinprogramm/convert-explicit))
+;(check-docs (quote deinprogramm/world))
+;(check-docs (quote deinprogramm/turtle))
+;(check-docs (quote deinprogramm/test-suite))
+;(check-docs (quote deinprogramm/syntax-checkers))
+;(check-docs (quote deinprogramm/run-dmda-code))
+;(check-docs (quote deinprogramm/line3d))
+;(check-docs (quote deinprogramm/image))
+;(check-docs (quote deinprogramm/DMdA))
+;(check-docs (quote deinprogramm/DMdA-vanilla))
+;(check-docs (quote deinprogramm/DMdA-vanilla-reader))
+;(check-docs (quote deinprogramm/DMdA-reader))
+;(check-docs (quote deinprogramm/DMdA-beginner))
+;(check-docs (quote deinprogramm/DMdA-beginner-reader))
+;(check-docs (quote deinprogramm/DMdA-assignments))
+;(check-docs (quote deinprogramm/DMdA-assignments-reader))
+(check-docs (quote deinprogramm/DMdA-advanced) #:skip #rx"^#%")
+;(check-docs (quote deinprogramm/DMdA-advanced-reader))
+;(check-docs (quote deinprogramm/define-record-procedures))
+;(check-docs (quote deinprogramm/convert-explicit))
diff --git a/collects/scribblings/htdp-langs/beginner.scrbl b/collects/scribblings/htdp-langs/beginner.scrbl
index 814d7f927e..3d72d8e538 100644
--- a/collects/scribblings/htdp-langs/beginner.scrbl
+++ b/collects/scribblings/htdp-langs/beginner.scrbl
@@ -7,7 +7,7 @@
 
 @title[#:style 'toc #:tag "beginner"]{Beginning Student}
 
-@declare-exporting[lang/htdp-beginner]
+@declare-exporting[lang/htdp-beginner #:use-sources (lang/htdp-beginner lang/private/teachprims)]
 
 @schemegrammar*+library[
 #:literals (define define-struct lambda cond else if and or empty true false require lib planet