[PATCH] Enhanced clipboard bug fix.

Here's a fix for the other bug re. kill and yank. I'd assumed that the "push" argument to own-selection was just another name for "append". However, the killing code doesn't use it like this at all - rather, it concatenates itself. I *hope* these two fix all the problems... Regards, Alastair. lisp/ChangeLog: 2000-07-18 Alastair J. Houghton <ajhoughton(a)lineone.net&gt; * select.el (own-clipboard): Bug fix. --- ../orig/xemacs-21.2/lisp/select.el Sun Jul 16 12:32:53 2000 +++ xemacs-21.2/lisp/select.el Tue Jul 18 11:23:50 2000 ＠＠ -190,14 +190,10 ＠＠ (setq lost-selection-hooks 'dehilight-selection) -(defun own-clipboard (string &optional how-to-add) +(defun own-clipboard (string &optional push) "Paste the given string to the window system Clipboard. -HOW-TO-ADD says how to add the string: - - 'replace-all or nil -- replace data for all formats. - 'replace-existing -- replace existing string data. - 'append or t -- append to existing string data." - (own-selection string 'CLIPBOARD how-to-add)) +See `interprogram-cut-function' for more information." + (own-selection string 'CLIPBOARD)) (defun disown-selection (&optional secondary-p) "Assuming we own the selection, disown it. With an argument, discard the -- ____________________________________________________________ Alastair Houghton ajhoughton(a)lineone.net