[Emacs-diffs] Changes to emacs/lisp/mouse-copy.el

[Juanma Barranquero]

Index: emacs/lisp/mouse-copy.el
diff -c emacs/lisp/mouse-copy.el:1.4 emacs/lisp/mouse-copy.el:1.5
*** emacs/lisp/mouse-copy.el:1.4        Fri Aug 30 07:01:29 2002
--- emacs/lisp/mouse-copy.el    Tue Feb  4 06:48:26 2003
***************
*** 151,157 ****
        (set-buffer end-buffer)
        (x-set-selection 'SECONDARY (buffer-substring beg end)))))
  
!     
  (defun mouse-drag-secondary-pasting (start-event)
    "Drag out a secondary selection, then paste it at the current point.
  
--- 151,157 ----
        (set-buffer end-buffer)
        (x-set-selection 'SECONDARY (buffer-substring beg end)))))
  
! 
  (defun mouse-drag-secondary-pasting (start-event)
    "Drag out a secondary selection, then paste it at the current point.
  
***************
*** 182,188 ****
        (insert (x-get-selection 'SECONDARY))
        (setq mouse-copy-last-paste-end (point)))
      (setq mouse-copy-last-paste-start nil)))
!   
  
  (defun mouse-kill-preserving-secondary ()
    "Kill the text in the secondary selection, but leave the selection set.
--- 182,188 ----
        (insert (x-get-selection 'SECONDARY))
        (setq mouse-copy-last-paste-end (point)))
      (setq mouse-copy-last-paste-start nil)))
! 
  
  (defun mouse-kill-preserving-secondary ()
    "Kill the text in the secondary selection, but leave the selection set.