diff --git a/init.el b/init.el index 84dfceb..51bcf31 100644 --- a/init.el +++ b/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)) diff --git a/lisp/+zzz-to-char.el b/lisp/+zzz-to-char.el new file mode 100644 index 0000000..b3f27f7 --- /dev/null +++ b/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