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 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))
|
||||
|
|
|
@ -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