From a48fad35f46e4ee63c494641051d3a2aa9b368f6 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 19 Aug 2007 13:20:06 +0000
Subject: [PATCH] minor doc edits

svn: r7121

original commit: 3f2341cda8a6a2d6cca07bdb50cf5281950b9f1a
---
 collects/scribble/scheme.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/scribble/scheme.ss b/collects/scribble/scheme.ss
index 2c7829ea..d08be8c4 100644
--- a/collects/scribble/scheme.ss
+++ b/collects/scribble/scheme.ss
@@ -492,7 +492,7 @@
   (define (register-scheme-definition stx)
     (unless (identifier? stx)
       (error 'register-scheme-definition "not an identifier: ~e" (syntax-object->datum stx)))
-    (format "definition:~s" 
+    (format "definition:~a" 
             (let ([b (identifier-binding stx)])
               (cond
                [(not b) (format "top:~a" (syntax-e stx))]