diff options
author | Case Duckworth | 2022-01-05 17:12:03 -0600 |
---|---|---|
committer | Case Duckworth | 2022-01-05 17:12:03 -0600 |
commit | 084618a930ddbe57903924e0635e5ca83c7dcb5c (patch) | |
tree | a5edc8b2fc10e0758b585ffcaadbd114ead9184e /lisp | |
parent | Add form-feed (diff) | |
download | emacs-084618a930ddbe57903924e0635e5ca83c7dcb5c.tar.gz emacs-084618a930ddbe57903924e0635e5ca83c7dcb5c.zip |
Break function into library
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/+zzz-to-char.el | 16 |
1 files changed, 16 insertions, 0 deletions
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 @@ | |||
1 | ;;; +zzz-to-char.el -*- lexical-binding: t; -*- | ||
2 | |||
3 | ;;; Commentary: | ||
4 | |||
5 | ;; | ||
6 | |||
7 | ;;; Code: | ||
8 | |||
9 | (defun +zzz-to-char (prefix) | ||
10 | "Call `zzz-to-char' or `zzz-up-to-char' with PREFIX arg." | ||
11 | (interactive "P") | ||
12 | (call-interactively | ||
13 | (if prefix #'zzz-up-to-char #'zzz-to-char))) | ||
14 | |||
15 | (provide '+zzz-to-char) | ||
16 | ;;; +zzz-to-char.el ends here | ||