bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit d3c27f4d56aa2e16479c4d6a7258220896b07e1e
parent e0a59049e5966b8e3f2c31c4a613905f524453ef
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Tue,  8 Jan 2008 18:15:06 +0000

make hash-lang delayed so that scribble/manual doesn't directly depend on scribblings/guide

svn: r8260

original commit: 57d173e6267d3ee93b4b9b8ef134ef19cc444cdc

Diffstat:
M
collects/scribble/manual.ss
 | 
16
++++++++--------
M
collects/scribblings/scribble/manual.scrbl
 | 
3
+++

2 files changed, 11 insertions(+), 8 deletions(-)
diff --git 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
@@ -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|.}