;;; tools/tree-sitter/autoload.el -*- lexical-binding: t; -*- ;;;###autoload (defun +tree-sitter-goto-textobj (group &optional previous end query) "Thin wrapper that returns the symbol of a named function, used in keybindings." (let ((sym (intern (format "+goto%s%s-%s" (if previous "-previous" "") (if end "-end" "") group)))) (fset sym (lambda () (interactive) (evil-textobj-tree-sitter-goto-textobj group previous end query))) sym))