rico -> racket-tool

original commit: c862eb8121be398c3741b1f68e3b3fbb224d92d9

collects/scribble/info.ss

@@ -3,3 +3,7 @@
 (define mzscheme-launcher-names '("scribble"))
 (define mzscheme-launcher-libraries '("run.ss"))
 (define compile-omit-paths '("test-reader.ss"))
+
+(define racket-tools
+  '(("scribble" scribble/run "render scribble" #f)))
+

collects/scribble/run.ss

@@ -6,6 +6,7 @@
          scheme/cmdline
          scheme/file
          scheme/class
+         tool/command-name
          (prefix-in text:  "text-render.ss")
          (prefix-in html:  "html-render.ss")
          (prefix-in latex: "latex-render.ss")
@@ -35,6 +36,7 @@
 
 (define (run)
   (command-line
+   #:program (short-program+command-name)
    #:once-any
    [("--text") "generate text-format output (the default)"
     (void)]

collects/scriblib/autobib.ss

@@ -36,7 +36,7 @@
    (lambda (renderer part ri)
      (let ([s (resolve-get part ri `(,which ,(auto-bib-key bib-entry)))])
        (list (make-link-element #f 
-                                (list s (auto-bib-specific bib-entry))
+                                (list (or s "???") (auto-bib-specific bib-entry))
                                 `(autobib ,(auto-bib-key bib-entry))))))
    (lambda () "(???)")
    (lambda () "(???)")))