diff --git a/doc/reference/std/cli/shell.md b/doc/reference/std/cli/shell.md
index b765901c3..69c61d26b 100644
--- a/doc/reference/std/cli/shell.md
+++ b/doc/reference/std/cli/shell.md
@@ -29,7 +29,7 @@ For good measure we also quote strings containing non-ASCII characters.
 ::: tip Examples:
 ```scheme
 > (string-for-each (lambda (c) (or (easy-shell-character? c) (error "foo")))
-    "abcdefghijklmnopqrstuvwxzABCDEFGHIJKLMNOPQRSTUVWXZ012345678@%+,-./:=@_") ;; no error
+    "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789@%+,-./:=@_") ;; no error
 > (string-for-each (lambda (c) (or (not (easy-shell-character? c)) (error "foo")))
     "!`~#$^&*()[{]}\\|;'\"<>? \r\n\t\v") ;; no error either
 ```
diff --git a/src/std/cli/shell-test.ss b/src/std/cli/shell-test.ss
index 8b7136a57..5e715b494 100644
--- a/src/std/cli/shell-test.ss
+++ b/src/std/cli/shell-test.ss
@@ -11,7 +11,7 @@
   (test-suite "test :std/misc/shell"
     (test-case "easy-shell-character?"
       (string-for-each (lambda (c) (check (easy-shell-character? c) => #t))
-                       "abcdefghijklmnopqrstuvwxzABCDEFGHIJKLMNOPQRSTUVWXZ012345678%+,-./:=@_")
+                       "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789%+,-./:=@_")
       (string-for-each (lambda (c) (check (easy-shell-character? c) => #f))
                        "!`~#$^&*()[{]}\\|;'\"<>? \r\n\t\v"))
     (test-case "needs-shell-escape?, escape-shell-token"