Как я могу переключаться между кнопками в Emacs?

Question

создать несколько кнопок в моем основном режиме с:

(insert-text-button "Start" :type 'start-btn) 
... 
(insert-text-button "Button2" :type 'b2-btn) 

Я хочу, чтобы перейти к следующему и пред. кнопок из положения курсора.

Я не знаю, как определить положение кнопки. Дай мне подсказку.

(defun jump-to-next-button() 
    "Jump to the next text button from current position." 
    (interactive) 
    ;; magic 
) 

Answer 1

Кнопка вставлена ​​с insert-text-button и связанными с ними функция использует button свойство текста, который вы можете искать с next-single-property-change. Тогда «волшебная» часть будет выглядеть так:

(goto-char (or (next-single-property-change (point) 'button) 
       (point-max)))