diff --git a/tools/gen-translit-def-part.lisp b/tools/gen-translit-def-part.lisp
index c680dfa..b3e2aab 100644
--- a/tools/gen-translit-def-part.lisp
+++ b/tools/gen-translit-def-part.lisp
@@ -75,7 +75,8 @@
                                                   ((eql c #\SUPERSCRIPT_TWO) (list #\^ #\2))
                                                   ((eql c #\SUPERSCRIPT_THREE) (list #\^ #\3))
                                                   ((eql c #\SCRIPT_SMALL_L) (list #\l))
-                                                  (t (list c)))) replacement))
+                                                  (t (list c))))
+                                          replacement))
                 (format out "~4,'0X~A~{~A~}~A# ~A~%" code #\Tab replacement #\Tab name)
             ) )
 ) ) ) ) ) )