Yes, if you like it, definitely feel free to include it in Carbon
Emacs!
Cheers,
Dave
PS: The next thing I'm looking at is why the mark/point move around
when you're scrolling in a buffer. I'd love for them to stay put
regardless of where I'm dragging my scrollbar...
On Nov 6, 6:02 pm, Seiji Zenitani <[EMAIL PROTECTED]> wrote:
> On 2007/11/06, at 1:58, Dave Peck wrote:
>
> > (defun dave-shift-mouse-select (event)
> > "Set the mark and then move point to the position clicked on with
> > the mouse.
> > This should be bound to a mouse click event type."
> > (interactive "e")
> > (mouse-minibuffer-check event)
> > (if mark-active (exchange-point-and-mark))
> > (set-mark-command nil)
> > ;; Use event-end in case called from mouse-drag-region.
> > ;; If EVENT is a click, event-end and event-start give same value.
> > (posn-set-point (event-end event)))
>
> > -Dave
>
> Very useful. Can I integrate the above code to my mac-key-mode
> ("Help > Carbon Emacs package > Mac-Style Key Bindings" in the menu
> bar)?
>
> Seiji
--~--~---------~--~----~------------~-------~--~----~
"Carbon Emacs" group mailing list.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/carbon-emacs?hl=en
-~----------~----~----~----~------~----~------~--~---
