Mercurial > hg > xemacs-beta

comparison src/select.h @ 410:de805c49cfc1 r21-2-35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents 74fd4e045ea6
children
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
21 /* Synched up with: Not in FSF. */ 21 /* Synched up with: Not in FSF. */
22 22
23 #ifndef INCLUDED_select_h_ 23 #ifndef INCLUDED_select_h_
24 #define INCLUDED_select_h_ 24 #define INCLUDED_select_h_
25 25
26 extern Lisp_Object QPRIMARY, QSECONDARY, QSTRING, QINTEGER, QCLIPBOARD, QTIMESTAMP, 26 /* X Atoms */
27 QTEXT, QDELETE, QMULTIPLE, QINCR, QEMACS_TMP, QTARGETS, QATOM, QNULL, 27 extern Lisp_Object QPRIMARY, QSECONDARY, QSTRING, QINTEGER, QCLIPBOARD,
28 QATOM_PAIR, QCOMPOUND_TEXT; 28 QTIMESTAMP, QTEXT, QDELETE, QMULTIPLE, QINCR, QEMACS_TMP, QTARGETS, QATOM,
29 QNULL, QATOM_PAIR, QCOMPOUND_TEXT;
29 30
30 /* This is an association list whose elements are of the form 31 /* Windows clipboard formats */
31 ( selection-name selection-value selection-timestamp ) 32 extern Lisp_Object QCF_TEXT, QCF_BITMAP, QCF_METAFILEPICT, QCF_SYLK, QCF_DIF,
32 selection-name is a lisp symbol, whose name is the name of an X Atom. 33 QCF_TIFF, QCF_OEMTEXT, QCF_DIB, QCF_PALETTE, QCF_PENDATA, QCF_RIFF,
33 selection-value is the value that emacs owns for that selection. 34 QCF_WAVE, QCF_UNICODETEXT, QCF_ENHMETAFILE, QCF_HDROP, QCF_LOCALE,
34 It may be any kind of Lisp object. 35 QCF_OWNERDISPLAY, QCF_DSPTEXT, QCF_DSPBITMAP, QCF_DSPMETAFILEPICT,
35 selection-timestamp is the time at which emacs began owning this selection, 36 QCF_DSPENHMETAFILE;
36 as a cons of two 16-bit numbers (making a 32 bit time). 37
37 If there is an entry in this alist, then it can be assumed that emacs owns 38 /* Selection strategies */
38 that selection. 39 extern Lisp_Object Qreplace_all, Qreplace_existing, Qappend;
39 The only (eq) parts of this list that are visible from elisp are the
40 selection-values.
41 */
42 extern Lisp_Object Vselection_alist;
43 40
44 /* "Selection owner couldn't convert selection" */ 41 /* "Selection owner couldn't convert selection" */
45 extern Lisp_Object Qselection_conversion_error; 42 extern Lisp_Object Qselection_conversion_error;
46 43
47 Lisp_Object get_local_selection (Lisp_Object selection_symbol, Lisp_Object target_type); 44 /* Selection input & output */
45 Lisp_Object select_convert_in (Lisp_Object selection,
46 Lisp_Object type,
47 Lisp_Object value);
48 Lisp_Object select_convert_out (Lisp_Object selection,
49 Lisp_Object type,
50 Lisp_Object value);
51
52 /* Notifications */
48 void handle_selection_clear (Lisp_Object selection_symbol); 53 void handle_selection_clear (Lisp_Object selection_symbol);
49 54
55 void select_notify_buffer_kill (Lisp_Object buffer);
56
57 /* Lisp functions we export for other files' use */
58 EXFUN (Fregister_selection_data_type, 2);
59 EXFUN (Fselection_data_type_name, 2);
60 EXFUN (Favailable_selection_types, 2);
61 EXFUN (Fselection_owner_p, 1);
62 EXFUN (Fselection_exists_p, 3);
63 EXFUN (Fget_selection_timestamp, 1);
64
50 #endif /* INCLUDED_select_h_ */ 65 #endif /* INCLUDED_select_h_ */