From 36f696d1d464d0c1f569195bdf485435d418bf32 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 5 May 1997 19:53:46 +0000 Subject: Comment change. --- lisp/term/x-win.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index a0cdc96e264..bd654a48668 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -582,6 +582,9 @@ This is in addition to the primary selection.") ;;; 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) -- cgit v1.2.1