From 19c351d03b219256721d823c1d2ffbabf1b2cf38 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 3 Mar 2008 21:59:09 +0000
Subject: [PATCH] plt-r6rs executable and initial r6rs docs

svn: r8859

original commit: b7cfd2fd0035df7a11cf274d1d3d4b43c13c50ef
---
 collects/scribble/base-render.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/scribble/base-render.ss b/collects/scribble/base-render.ss
index d6d841fb..8d1b60ac 100644
--- a/collects/scribble/base-render.ss
+++ b/collects/scribble/base-render.ss
@@ -121,7 +121,7 @@
 
     (define/private (convert-key prefix k)
       (case (car k)
-        [(part tech)
+        [(part tech cite)
          (let ([rhs (cadr k)])
            (if (or (string? rhs) (pair? rhs))
                (list (car k) (cons prefix (if (pair? rhs)