diff --git a/collects/scribblings/gui/editor-intf.scrbl b/collects/scribblings/gui/editor-intf.scrbl
index a9ba18108b..44c8ee4be2 100644
--- a/collects/scribblings/gui/editor-intf.scrbl
+++ b/collects/scribblings/gui/editor-intf.scrbl
@@ -930,10 +930,10 @@ The @scheme[show-errors?] argument is no longer used.
 
 
 @defmethod[(insert-image [filename (or/c path-string? #f) #f]
-                         [type (one-of/c 'unknown 'unknown/mask 'unknown/alpha
-                                         'gif 'gif/mask 'gif/alpha 
-                                         'jpeg 'png 'png/mask 'png/alpha
-                                         'xbm 'xpm 'bmp 'pict)
+                         [type (or/c 'unknown 'unknown/mask 'unknown/alpha
+                                     'gif 'gif/mask 'gif/alpha 
+                                     'jpeg 'png 'png/mask 'png/alpha
+                                     'xbm 'xpm 'bmp 'pict)
                                'unknown/alpha]
                          [relative-path? any/c #f]
                          [inline? any/c #t])
@@ -1496,10 +1496,10 @@ Creates a @scheme[editor-snip%] with either a sub-editor from
 
 
 @defmethod[(on-new-image-snip [filename path?]
-                              [kind (one-of/c 'unknown 'unknown/mask 'unknown/alpha
-                                              'gif 'gif/mask 'gif/alpha 
-                                              'jpeg 'png 'png/mask 'png/alpha
-                                              'xbm 'xpm 'bmp 'pict)]
+                              [kind (or/c 'unknown 'unknown/mask 'unknown/alpha
+                                          'gif 'gif/mask 'gif/alpha 
+                                          'jpeg 'png 'png/mask 'png/alpha
+                                          'xbm 'xpm 'bmp 'pict)]
                               [relative-path? any/c]
                               [inline? any/c])
            (is-a?/c image-snip%)]{
@@ -1527,7 +1527,7 @@ Returns @scheme[(make-object image-snip% filename kind relative-path? inline?)].
                      [bottom real?]
                      [dx real?]
                      [dy real?]
-                     [draw-caret (or/c (one-of/c 'no-caret 'show-inactive-caret 'show-caret)
+                     [draw-caret (or/c 'no-caret 'show-inactive-caret 'show-caret
                                        (cons/c exact-nonnegative-integer?
                                                exact-nonnegative-integer?))])
            void?]{
@@ -1873,7 +1873,7 @@ See also @method[editor<%> add-undo].
                     [y real?]
                     [width (and/c real? (not/c negative?))]
                     [height (and/c real? (not/c negative?))]
-                    [draw-caret (or/c (one-of/c 'no-caret 'show-inactive-caret 'show-caret)
+                    [draw-caret (or/c 'no-caret 'show-inactive-caret 'show-caret
                                       (cons/c exact-nonnegative-integer?
                                               exact-nonnegative-integer?))]
                     [background (or/c (is-a?/c color%) #f)])