Rackety and minor edits.

original commit: a2157b86dc051d46ac438faf198593bfd4bf0cb3

collects/scribblings/gui/widget-gallery.rkt

@@ -1,18 +1,16 @@
-(module widget scheme/base
-  (require racket/string
-           "common.rkt")
+#lang racket/base
+(require racket/string
+         "common.rkt")
 
-  (provide showcase-widget)
+(provide showcase-widget)
 
-  (define-syntax showcase-widget
-    (syntax-rules ()
-      ((_ widget code ...)
-       (begin
-         (racketlink widget
-                     (image #:suffixes
-                            (list ".png")
-                            (string-append "image/"
-                                           (string-trim (symbol->string 'widget)
-                                                        "%"
-                                                        #:left? #f))))
-         (racketblock code ...))))))
+(define-syntax-rule (showcase-widget widget code ...)
+  (begin
+    (racketlink widget
+                (image #:suffixes
+                       (list ".png")
+                       (string-append "image/"
+                                      (string-trim (symbol->string 'widget)
+                                                   "%"
+                                                   #:left? #f))))
+    (racketblock code ...)))

collects/scribblings/gui/widget-gallery.scrbl

@@ -4,7 +4,12 @@
 
 @title[#:style '(toc quiet)]{Widget Gallery}
 
-This section gives an overview of the main widgets available in the Racket Graphical Interface Toolkit and each image points to its full documentation.
+@; Note: Instructions for taking widget screenshots are avaiable at:
+@;   ./taking-screenshots/instructions
+
+This section shows the main widgets available in the Racket Graphical User
+Interface Toolkit. Each image is a link to the documentation of the relevant
+widget.
 
 @(showcase-widget button%
 (define button (new button%