Break function into library
This commit is contained in:
parent
2c86771b1d
commit
084618a930
8
init.el
8
init.el
|
@ -1320,8 +1320,6 @@ See also `crux-reopen-as-root-mode'."
|
||||||
(setup (:straight zoom-frm))
|
(setup (:straight zoom-frm))
|
||||||
|
|
||||||
(setup (:straight zzz-to-char)
|
(setup (:straight zzz-to-char)
|
||||||
(:+key "M-z" (lambda (prefix)
|
(:require +zzz-to-char)
|
||||||
"Call `zzz-to-char' or `zzz-up-to-char' with PREFIX arg."
|
(:option zzz-to-char-reach 1024)
|
||||||
(interactive "P")
|
(:global "M-z" #'+zzz-to-char))
|
||||||
(call-interactively
|
|
||||||
(if prefix #'zzz-up-to-char #'zzz-to-char)))))
|
|
||||||
|
|
|
@ -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
|
Loading…
Reference in New Issue