Adrian Aichner writes:
This analysis was wrong.
mouse-track-insert between buffers DOES work in 21.2-b40, 21.5-b1, and
even 21.1.14 until one performs
I just verified the same results in 21.1.13 windows.
Now do
C-x C-b (list-buffers)
and mouse-track-insert now longer works!
Instead it will activate a region on the double-clicked work and
display set mark in the echo area.
Electric-buffer-list has the same effect as list-buffers.
The funny thing thing is that I never realized that mouse-track-insert was
supposed to work with clicking. (I guess that is what the obviously named
mouse-track-click-hook is supposed to do).
Long ago, I patched my version of mouse-track-insert to extract out
the region clicked on by backward-sexp through forward-sexp.
-jeff
(defun mouse-track-insert (event &optional delete)
"Make a selection with the mouse and insert it at point...."
(interactive "*e")
(setq mouse-track-insert-selected-region nil)
(let ((mouse-track-drag-up-hook 'mouse-track-insert-drag-up-hook)
(mouse-track-click-hook 'mouse-track-insert-click-hook)
s)
(save-excursion ....)
;; >>> added this. JWM <<<
(if (or (null s) (equal s ""))
(save-excursion
(save-window-excursion
(mouse-set-point event)
(setq s (buffer-substring (progn (backward-sexp) (point)) (progn
(forward-sexp) (point)))))))
;; <<< >>>
(or (null s) (equal s "") (insert s))))