aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/select.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/select.el b/lisp/select.el
index 60259142522..e9e5e2185f6 100644
--- a/lisp/select.el
+++ b/lisp/select.el
@@ -125,6 +125,8 @@ prefix argument, it uses the text of the region as the selection value ."
125 125
126;;; Cut Buffer support 126;;; Cut Buffer support
127 127
128(declare-function x-get-cut-buffer-internal "xselect.c")
129
128(defun x-get-cut-buffer (&optional which-one) 130(defun x-get-cut-buffer (&optional which-one)
129 "Returns the value of one of the 8 X server cut-buffers. 131 "Returns the value of one of the 8 X server cut-buffers.
130Optional arg WHICH-ONE should be a number from 0 to 7, defaulting to 0. 132Optional arg WHICH-ONE should be a number from 0 to 7, defaulting to 0.
@@ -136,6 +138,9 @@ Cut buffers are considered obsolete; you should use selections instead."
136 which-one) 138 which-one)
137 'CUT_BUFFER0))) 139 'CUT_BUFFER0)))
138 140
141(declare-function x-rotate-cut-buffers-internal "xselect.c")
142(declare-function x-store-cut-buffer-internal "xselect.c")
143
139(defun x-set-cut-buffer (string &optional push) 144(defun x-set-cut-buffer (string &optional push)
140 "Store STRING into the X server's primary cut buffer. 145 "Store STRING into the X server's primary cut buffer.
141If PUSH is non-nil, also rotate the cut buffers: 146If PUSH is non-nil, also rotate the cut buffers: