Re: automatically change input method based on context

[Stefan Monnier <monnier@iro.umontreal.ca>]

> 1. Add a `cursor-sensor-functions' property to all the text that is
>    fontified as a comment (and somehow keep this dynamically updated).
[...]
> But I don't know how to go about (1).  Any advice?

Yes: an after-advice.  On `font-lock-fontify-syntactically-region`.

Something along the lines of

    (add-advice 'font-lock-fontify-syntactically-region :after
                #'my-font-lock-comment-to-cursor-sensor)
    (defun my-font-lock-comment-to-cursor-sensor (start end &rest _)
      (save-excursion
        (goto-char start)
        (while (< (point) end)
          (if (not (eq (get-text-property (point) 'face)
                       'font-lock-comment-face))
              (goto-char (or (text-property-any (point) end 'face
                                                'font-lock-comment-face)
                             end))
            (let ((s (point)))
              (goto-char (or (text-property-not-all (point) end 'face
                                                    'font-lock-comment-face)
                             end))
              (put-text-property s (point) 'cursor-sensor-functions
                                 #'my-cursor-sensor-fun))))))
                  

-- Stefan