diff --git a/org/text-input.org b/org/text-input.org
index b7bddd7..de63dbe 100644
--- a/org/text-input.org
+++ b/org/text-input.org
@@ -430,7 +430,7 @@ sequences where modifiers appear in a non-standard position.
                           :raw (string (code-char code))))
         (make-key-event :key (or key :unknown)
                         :ctrl ctrl :alt alt :shift shift
-                        :raw (format nil "~C[~{~d~};~d~C" #\Esc params terminator)))))
+                        :raw (format nil "~C[~{~d~};~d" #\Esc params terminator)))))
 #+END_SRC
 
 ** Raw byte reader