Change clipboard/primary selection to X application standards.

* lisp/menu-bar.el (menu-bar-enable-clipboard): Don't overwrite
Cut/Copy/Paste menu bar items.

* lisp/mouse.el: Bind mouse-2 to mouse-yank-primary.
(mouse-drag-copy-region): Default to nil.

* lisp/simple.el (select-active-regions): Default to t.
(push-mark-command): Don't overwrite primary with empty string.

* lisp/term/x-win.el (x-select-enable-clipboard): Default to t.
(x-initialize-window-system): Don't overwrite Paste menu item.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 30fd26b51fc..b159add0d91 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -41,7 +41,7 @@
   :type 'boolean
   :group 'mouse)
 
-(defcustom mouse-drag-copy-region t
+(defcustom mouse-drag-copy-region nil
   "If non-nil, mouse drag copies region to kill-ring."
   :type 'boolean
   :version "22.1"
@@ -2443,7 +2443,7 @@ choose a font."
 (global-set-key [left-fringe mouse-1]   'mouse-set-point)
 (global-set-key [right-fringe mouse-1]  'mouse-set-point)
 
-(global-set-key [mouse-2]       'mouse-yank-at-click)
+(global-set-key [mouse-2]       'mouse-yank-primary)
 ;; Allow yanking also when the corresponding cursor is "in the fringe".
 (global-set-key [right-fringe mouse-2] 'mouse-yank-at-click)
 (global-set-key [left-fringe mouse-2] 'mouse-yank-at-click)