From 2e2c69073016af1de0855bc457913444872e4af0 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 8 Jun 2008 15:23:51 +0000
Subject: [PATCH] fix index output where exporting module's name is not just an
 identifier

svn: r10190

original commit: 6b721a04f0b3176d3fb6a77d480883903a468f5e
---
 collects/scribble/basic.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/scribble/basic.ss b/collects/scribble/basic.ss
index 239298c5..0aefa064 100644
--- a/collects/scribble/basic.ss
+++ b/collects/scribble/basic.ss
@@ -278,7 +278,8 @@
   (define (get-desc entry)
     (let ([desc (cadddr entry)])
       (cond [(exported-index-desc? desc)
-             (cons 'libs (map symbol->string
+             (cons 'libs (map (lambda (l)
+                                (format "~s" l))
                               (exported-index-desc-from-libs desc)))]
             [(module-path-index-desc? desc) '(mod)]
             [(part-index-desc? desc) '(part)]