doc repairs

svn: r12216 original commit: 0b79aaa1aeec28d2b1716028fb7ba51ef5b1d8a0
2008-11-02 12:28:59 +00:00 · 2008-11-02 12:28:59 +00:00 · fa3a1de098
commit fa3a1de098
parent 5a7821c879
1 changed files with 3 additions and 1 deletions
--- a/collects/scribble/basic.ss
+++ b/collects/scribble/basic.ss
@ -119,7 +119,9 @@
            (list? v))
        (let ([b (hash-ref interned v #f)])
          (if b
-              (weak-box-value b)
+              (or (weak-box-value b)
+                  ;; just in case the value is GCed before we extract it:
+                  (intern-taglet v))
              (begin
                (hash-set! interned v (make-weak-box v))
                v)))