[2659] in Release_Engineering

home help back first fref pref prev next nref lref last post

Re: emacs

daemon@ATHENA.MIT.EDU (Marc Horowitz)
Thu Jun 27 23:00:19 1991

To: ckclark@ATHENA.MIT.EDU
Cc: rel-eng@ATHENA.MIT.EDU
In-Reply-To: [2658] in Release_Engineering
Reply-To: Marc Horowitz <marc@MIT.EDU>
Date: Thu, 27 Jun 91 23:00:13 EDT
From: Marc Horowitz <marc@ATHENA.MIT.EDU>

>> Does *not* use the X toolkit. Selection, cut, and paste code is
>> written in Xlib.  

I assumed you mean selections, and not cut buffers.

>> The mouse pastes at mouse position, rather than at cursor position.

I consider this behavior brain-damaged, and it's really easy to fix.
This is also a very user-visible change, for no good reason.

;; This makes the default behavior of mouse paste sensible.
;; On athena, it's sane by default, but everywhere else, it isn't.

(defvar x-paste-move-point nil)

(defun x-paste-text (arg)
  "Move point to mouse position (if x-paste-move-point is non-nil) and\n\
insert window system cut buffer contents."
  (if x-paste-move-point (x-mouse-set-point arg))
  (insert (x-get-cut-buffer)))

If people really want the broken behavior, they can 

(setq x-paste-move-point t)

and get it.

		Marc

home help back first fref pref prev next nref lref last post