1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00

(x-set-cut-buffer): Fix signal arguments.

This commit is contained in:
Glenn Morris 2008-11-25 04:23:59 +00:00
parent 19454c0a2a
commit 96ead4f94b

View File

@ -3,8 +3,8 @@
;; Maintainer: FSF
;; Keywords: internal
;; Copyright (C) 1993, 1994, 2001, 2002, 2003, 2004,
;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
;; Copyright (C) 1993, 1994, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
;; 2008 Free Software Foundation, Inc.
;; Based partially on earlier release by Lucid.
;; This file is part of GNU Emacs.
@ -201,7 +201,7 @@ If PUSH is non-nil, also rotate the cut buffers:
this means the previous value of the primary cut buffer moves to the second
cut buffer, and the second to the third, and so on (there are 8 buffers.)
Cut buffers are considered obsolete; you should use selections instead."
(or (stringp string) (signal 'wrong-type-argument (list 'string string)))
(or (stringp string) (signal 'wrong-type-argument (list 'stringp string)))
(if push
(x-rotate-cut-buffers-internal 1))
(x-store-cut-buffer-internal 'CUT_BUFFER0 string))