Break function into library

init.el

@@ -1320,8 +1320,6 @@ See also `crux-reopen-as-root-mode'."
 (setup (:straight zoom-frm))
 
 (setup (:straight zzz-to-char)
-  (:+key "M-z" (lambda (prefix)
-                 "Call `zzz-to-char' or `zzz-up-to-char' with PREFIX arg."
-                 (interactive "P")
-                 (call-interactively
-                  (if prefix #'zzz-up-to-char #'zzz-to-char)))))
+  (:require +zzz-to-char)
+  (:option zzz-to-char-reach 1024)
+  (:global "M-z" #'+zzz-to-char))

lisp/+zzz-to-char.el

@@ -0,0 +1,16 @@
+;;; +zzz-to-char.el                                  -*- lexical-binding: t; -*-
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(defun +zzz-to-char (prefix)
+  "Call `zzz-to-char' or `zzz-up-to-char' with PREFIX arg."
+  (interactive "P")
+  (call-interactively
+   (if prefix #'zzz-up-to-char #'zzz-to-char)))
+
+(provide '+zzz-to-char)
+;;; +zzz-to-char.el ends here