emacs lispのクリックイベントを登録しています

Question

クリックイベントを登録し、position、windowなどに基づいてアクションを実行したいと思います。

このサイトhttp://www.gnu.org/software/emacs/manual/html_node/elisp/Click-Events.htmlにはイベント変数のレイアウトが表示されていますが、クリックイベントに実際にハンドラを付加するにはどうすればいいですか。

したがって、基本的に私はattach-handlerのようなふうに動作する関数を以下のシナリオで探しています。

(attach-handler [mouse-1] 
     `(lambda (e) (foo e)) 

Answer 1

interactive宣言のコード文字「e」を使用してイベントにアクセスすることができます。たとえば、次のようにクリックすると、左クリックでイベントデータが挿入されます。

(define-key global-map (kbd "<down-mouse-1>") 
    (lambda (event) 
    (interactive "e") 
    (message "%s" event) 
    (let ((posn (elt event 1))) 
     (with-selected-window (posn-window posn) 
     (goto-char (posn-point posn)) 
     (insert (format "%s" event)))))) 

Answer 2

これらはすべてキーです。 C-h c（またはC-h k）を試して、マウスボタンをクリックして現在バインドされているものを確認してください。次に、M-x global-set-keyを使用して、希望するものに設定します。キーにバインドするには、関数をinteractiveにする必要があります。