Mercurial > emacs
comparison src/xselect.c @ 30355:36c049a9730b
*** empty log message ***
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 21 Jul 2000 02:39:45 +0000 |
parents | 63f82aef9860 |
children | c6aabac439cb |
comparison
equal
deleted
inserted
replaced
30354:7540bd2b5a34 | 30355:36c049a9730b |
---|---|
1646 } | 1646 } |
1647 else if (STRINGP (obj)) | 1647 else if (STRINGP (obj)) |
1648 { | 1648 { |
1649 /* Since we are now handling multilingual text, we must consider | 1649 /* Since we are now handling multilingual text, we must consider |
1650 sending back compound text. */ | 1650 sending back compound text. */ |
1651 int latin1_p; | 1651 int stringp; |
1652 | 1652 |
1653 if (NILP (Vnext_selection_coding_system)) | 1653 if (NILP (Vnext_selection_coding_system)) |
1654 Vnext_selection_coding_system = Vselection_coding_system; | 1654 Vnext_selection_coding_system = Vselection_coding_system; |
1655 | 1655 |
1656 *format_ret = 8; | 1656 *format_ret = 8; |
1657 *data_ret = x_encode_text (obj, Vnext_selection_coding_system, | 1657 *data_ret = x_encode_text (obj, Vnext_selection_coding_system, |
1658 (int *) size_ret, &latin1_p); | 1658 (int *) size_ret, &stringp); |
1659 *nofree_ret = (*data_ret == XSTRING (obj)->data); | 1659 *nofree_ret = (*data_ret == XSTRING (obj)->data); |
1660 if (NILP (type)) | 1660 if (NILP (type)) |
1661 type = (latin1_p ? QSTRING : QCOMPOUND_TEXT); | 1661 type = (stringp ? QSTRING : QCOMPOUND_TEXT); |
1662 Vlast_coding_system_used = (*nofree_ret | 1662 Vlast_coding_system_used = (*nofree_ret |
1663 ? Qraw_text | 1663 ? Qraw_text |
1664 : Vnext_selection_coding_system); | 1664 : Vnext_selection_coding_system); |
1665 Vnext_selection_coding_system = Qnil; | 1665 Vnext_selection_coding_system = Qnil; |
1666 } | 1666 } |