diff --git a/collects/scribble/manual.ss b/collects/scribble/manual.ss
index 3ce8d2e3..3fba5418 100644
--- a/collects/scribble/manual.ss
+++ b/collects/scribble/manual.ss
@@ -49,7 +49,7 @@
                               #'here
                               `(unsyntax (make-element
                                           #f
-                                          (list hash-lang
+                                          (list (hash-lang)
                                                 (hspace 1)
                                                 (as-modname-link
                                                  ',#'lang
@@ -140,7 +140,7 @@
                 (list (make-paragraph
                        (if lang?
                            (list (hspace 1)
-                                 hash-lang
+                                 (hash-lang)
                                  (hspace 1)
                                  (make-defschememodname name))
                            (list
@@ -1794,12 +1794,12 @@
              c)))
   (provide pidefterm)
 
-
-  (define hash-lang (make-link-element
-                     "schememodlink"
-                     (list (schememodfont "#lang"))
-                     `(part ,(doc-prefix '(lib "scribblings/guide/guide.scrbl")
-                                         "hash-lang"))))
+  (provide hash-lang)
+  (define (hash-lang) (make-link-element
+                       "schememodlink"
+                       (list (schememodfont "#lang"))
+                       `(part ,(doc-prefix '(lib "scribblings/guide/guide.scrbl")
+                                           "hash-lang"))))
   
   ;; ----------------------------------------
 
diff --git a/collects/scribblings/scribble/manual.scrbl b/collects/scribblings/scribble/manual.scrbl
index b47928a3..f3842a06 100644
--- a/collects/scribblings/scribble/manual.scrbl
+++ b/collects/scribblings/scribble/manual.scrbl
@@ -821,6 +821,9 @@ Returns @scheme[#t] if @scheme[v] is a bibliography entry created by
 @defthing[PLaneT string?]{@scheme["PLaneT"] (to help make sure you get
 the letters in the right case).}
 
+@defproc[(hash-lang) element?]{Returns an element for @hash-lang[]
+that is hyperlinked to an explanation.}
+
 @defthing[void-const element?]{Returns an element for @|void-const|.}
 
 @defthing[undefined-const element?]{Returns an element for @|undefined-const|.}