Closed j-steinbach closed 1 year ago
Same question. Please! Anyone care to answer this question?
Like this, maybe?
(defun my/langtool-correct-from-point ()
"Execute interactive correction after `langtool-check', from point"
(interactive)
(let ((ovs (langtool--overlays-region (point) (point-max))))
(if (null ovs)
(message "No error found. %s"
(substitute-command-keys
(concat
"Type \\[langtool-check-done] to finish checking "
"or type \\[langtool-check] to re-check buffer")))
(barf-if-buffer-read-only)
(langtool--correction ovs))))
After consideration, introduce as M-x langtool-correct-at-point
.
I only see the function
langtool-correct-buffer
, but I just want to correct the word my cursor is currently hovering over.Is there something like
langtool-correct-word-at-point
?