Mercurial > emacs
changeset 17670:40d6f66af2bc
Comment change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 05 May 1997 19:53:46 +0000 |
| parents | 607e8ef61ed0 |
| children | 3e65698d4ce9 |
| files | lisp/term/x-win.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/x-win.el Mon May 05 19:16:09 1997 +0000 +++ b/lisp/term/x-win.el Mon May 05 19:53:46 1997 +0000 @@ -582,6 +582,9 @@ ;;; Return the value of the current X selection. ;;; Consult the selection, then the cut buffer. Treat empty strings ;;; as if they were unset. +;;; If this function is called twice and finds the same text, +;;; it returns nil the second time. This is so that a single +;;; selection won't be added to the kill ring over and over. (defun x-cut-buffer-or-selection-value () (let (text)