/[emacs]/emacs/lisp/select.el
ViewVC logotype

Diff of /emacs/lisp/select.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17.2.3 by miles, Tue May 11 02:20:02 2004 UTC revision 1.17.2.4 by miles, Sat Sep 4 09:18:38 2004 UTC
# Line 3  Line 3 
3  ;; Maintainer: FSF  ;; Maintainer: FSF
4  ;; Keywords: internal  ;; Keywords: internal
5    
6  ;; Copyright (c) 1993, 1994 Free Software Foundation, Inc.  ;; Copyright (c) 1993, 1994, 2004 Free Software Foundation, Inc.
7  ;; Based partially on earlier release by Lucid.  ;; Based partially on earlier release by Lucid.
8    
9  ;; This file is part of GNU Emacs.  ;; This file is part of GNU Emacs.
# Line 35  The argument TYPE (default `PRIMARY') sa Line 35  The argument TYPE (default `PRIMARY') sa
35  and the argument DATA-TYPE (default `STRING') says  and the argument DATA-TYPE (default `STRING') says
36  how to convert the data.  how to convert the data.
37    
38  TYPE may be `SECONDARY' or `CLIPBOARD', in addition to `PRIMARY'.  TYPE may be any symbol \(but nil stands for `PRIMARY').  However,
39    only a few symbols are commonly used.  They conventionally have
40    all upper-case names.  The most often used ones, in addition to
41    `PRIMARY', are `SECONDARY' and `CLIPBOARD'.
42    
43  DATA-TYPE is usually `STRING', but can also be one of the symbols  DATA-TYPE is usually `STRING', but can also be one of the symbols
44  in `selection-converter-alist', which see."  in `selection-converter-alist', which see."
45    (let ((data (x-get-selection-internal (or type 'PRIMARY)    (let ((data (x-get-selection-internal (or type 'PRIMARY)
# Line 57  in `selection-converter-alist', which se Line 61  in `selection-converter-alist', which se
61    
62  (defun x-set-selection (type data)  (defun x-set-selection (type data)
63    "Make an X Windows selection of type TYPE and value DATA.    "Make an X Windows selection of type TYPE and value DATA.
64  The argument TYPE (default `PRIMARY') says which selection,  The argument TYPE (nil means `PRIMARY') says which selection, and
65  and DATA specifies the contents.  DATA may be a string,  DATA specifies the contents.  TYPE must be a symbol.  \(It can also
66  a symbol, an integer (or a cons of two integers or list of two integers).  be a string, which stands for the symbol with that name, but this
67    is considered obsolete.)  DATA may be a string, a symbol, an
68    integer (or a cons of two integers or list of two integers).
69    
70  The selection may also be a cons of two markers pointing to the same buffer,  The selection may also be a cons of two markers pointing to the same buffer,
71  or an overlay.  In these cases, the selection is considered to be the text  or an overlay.  In these cases, the selection is considered to be the text
# Line 69  can alter the effective value of the sel Line 75  can alter the effective value of the sel
75    
76  The data may also be a vector of valid non-vector selection values.  The data may also be a vector of valid non-vector selection values.
77    
78  Interactively, the text of the region is used as the selection value  The return value is DATA.
79  if the prefix arg is set."  
80    Interactively, this command sets the primary selection.  Without
81    prefix argument, it reads the selection in the minibuffer.  With
82    prefix argument, it uses the text of the region as the selection value ."
83    (interactive (if (not current-prefix-arg)    (interactive (if (not current-prefix-arg)
84                     (list 'PRIMARY (read-string "Set text for pasting: "))                     (list 'PRIMARY (read-string "Set text for pasting: "))
85                   (list 'PRIMARY (buffer-substring (region-beginning) (region-end)))))                   (list 'PRIMARY (buffer-substring (region-beginning) (region-end)))))

Legend:
Removed from v.1.17.2.3  
changed lines
  Added in v.1.17.2.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26