diff --git a/dotfiles/emacs.d/load.d/multi-line-test.el b/dotfiles/emacs.d/load.d/multi-line-test.el new file mode 100644 index 00000000..330b955a --- /dev/null +++ b/dotfiles/emacs.d/load.d/multi-line-test.el @@ -0,0 +1,15 @@ +(defun test-multi-line-enter () + (interactive) + (multi-line-enter + (make-instance multi-line-forward-sexp-enter-strategy))) + +(defun test-multi-line-find-next () + (interactive) + (message "%s" (multi-line-find-next + (make-instance multi-line-forward-sexp-find-strategy)))) + +(defun test-multi-line-get-markers () + (interactive) + (message "%d" (length (multi-line-get-markers + (make-instance multi-line-forward-sexp-enter-strategy) + (make-instance multi-line-forward-sexp-find-strategy)))))