<div dir="ltr"><div class="gmail_default" style="font-size:large">Thx, but what I gave up on (after a whole 30s of investigation) was actually coding the behavior working from other examples of high level edit functionality coded in elisp, using elisp subroutines. I am sure five minutes would have gotten me over the hurdle, but there has been no real need. AllegroCL has the commands, and Cursive is unhackable. </div><div class="gmail_default" style="font-size:large"><br></div><div class="gmail_default" style="font-size:large">Hmmm, I should ask about that. I just had a chat with its developer on #Clojurians and I think I failed to sell him on implementing it, but maybe... </div></div><div class="gmail_extra"><br><div class="gmail_quote">On Fri, Jun 22, 2018 at 3:51 AM, Pascal Bourguignon <span dir="ltr"><<a href="mailto:pjb@informatimago.com" target="_blank">pjb@informatimago.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div style="word-wrap:break-word;line-break:after-white-space"><br><div><span class=""><br><blockquote type="cite"><div>On 22 Jun 2018, at 02:24, Ken Tilton <<a href="mailto:kentilton@gmail.com" target="_blank">kentilton@gmail.com</a>> wrote:</div><div><div dir="ltr"><div class="gmail_default" style="font-size:large"><br></div><div class="gmail_default" style="font-size:large">I looked at coding up mouse commands myself but just out of curiosity and gave up without even trying. But I am sure it would be doable.</div></div></div></blockquote><div><br></div></span>It is very easy to do.  Just bind mouse events like any other key chord.</div><div><br></div><div>down-mouse-1</div><div>mouse-1</div><div>-2 for middle and -3 for left button.</div><div>You can of course combine it with modifiers: C-M-mouse-1 = Control Meta left button click.</div><div><br></div><div>(local-set-key (kbd "C-M-<mouse-1>") (lambda () (interactive) (insert "Mice!")))</div><span class="HOEnZb"><font color="#888888"><div><br></div><br><div>
<div style="color:rgb(0,0,0);letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;word-wrap:break-word;line-break:after-white-space"><div style="color:rgb(0,0,0);letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;word-wrap:break-word;line-break:after-white-space"><div style="color:rgb(0,0,0);letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;word-wrap:break-word;line-break:after-white-space">-- <br>__Pascal J. Bourguignon__</div><div style="color:rgb(0,0,0);letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;word-wrap:break-word;line-break:after-white-space"><br><br><br></div></div></div>
</div>
<br></font></span></div></blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div>Kenneth Tilton</div><div><a href="http://tiltontec.com/" target="_blank">http://tiltontec.com/</a><br></div></div></div>
</div>