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

commit 18d1528808955bbe92c8632246d2869343c09625
parent 878223492be1de2105e740a3864803b8bafce179
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Wed, 19 Dec 2007 15:36:35 +0000

catch sxref failures and report as warnings when loading help data

svn: r8063

original commit: b78f8acb504cf8e6100e754baf58c19b9c989dd4

Diffstat:
M
collects/scribble/xref.ss
 | 
4
+++-
M
collects/scribblings/scribble/xref.scrbl
 | 
3
++-

2 files changed, 5 insertions(+), 2 deletions(-)
diff --git a/collects/scribble/xref.ss b/collects/scribble/xref.ss
@@ -40,7 +40,9 @@
          [ci (send renderer collect null null)])
     (for-each (lambda (src)
                 (parameterize ([current-namespace (namespace-anchor->empty-namespace here)])
-                  (send renderer deserialize-info (src) ci)))
+                  (let ([v (src)])
+                    (when v
+                      (send renderer deserialize-info v ci)))))
               sources)
     (make-xrefs renderer (send renderer resolve null null ci))))
 
diff --git a/collects/scribblings/scribble/xref.scrbl b/collects/scribblings/scribble/xref.scrbl
@@ -27,7 +27,8 @@ by @scheme[load-xref], @scheme[#f] otherwise.}
 
 Creates a cross-reference record given a list of functions that each
 produce a serialized information obtained from @xmethod[render%
-serialize-info].
+serialize-info]. If a @scheme[sources] element produces @scheme[#f],
+its result is ignored.
 
 Since the format of serialized information is specific to a rendering
 class, the optional @scheme[using-render%] argument accepts the