怎么在调用consult-ripgrep的时候自动获取光标下的symbol

[VagrantJoker]

之前我也有类似的需求，就参考别人的写了个方案：

更通用的xxx-thing-at-point

最近转用了consult，不过发现作者有点保守，加个consult-line-thing-at-ppoint都不愿意，加上以前用swiper的时候习惯了fly（我不知道这个功能叫什么合适 ） 然后就自己糊（chao）了一个： (defvar mcfly-commands '(consult-line)) (defvar mcfly-back-commands '(self-insert-command)) (defun mcfly-back-to-present () (remove-hook 'pre-command-hook 'mcfly-back-to-present t) (cond ((and (memq last-command mcfly-commands) (equal (this-command-keys-vector) (kbd "M-p"))) ;; repeat one time to get straight to the first history item …