Mercurial > emacs
diff src/xselect.c @ 22716:2d00337b7152
(selection_data_to_lisp_data): Set Vlast_coding_system_used.
(lisp_data_to_selection_data): Likewize.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 09 Jul 1998 02:02:33 +0000 |
| parents | a3a1164f9ad9 |
| children | a5015b8f1003 |
line wrap: on
line diff
--- a/src/xselect.c Wed Jul 08 02:55:50 1998 +0000 +++ b/src/xselect.c Thu Jul 09 02:02:33 1998 +0000 @@ -1494,7 +1494,10 @@ } } if (!require_encoding) - str = make_unibyte_string ((char *) data, size); + { + str = make_unibyte_string ((char *) data, size); + Vlast_coding_system_used = Qraw_text; + } else { int bufsize; @@ -1512,6 +1515,7 @@ : coding.produced_char); str = make_string_from_bytes ((char *) buf, size, coding.produced); xfree (buf); + Vlast_coding_system_used = coding.symbol; } return str; } @@ -1627,6 +1631,7 @@ /* No multibyte character in OBJ. We need not encode it. */ *nofree_ret = 1; if (NILP (type)) type = QSTRING; + Vlast_coding_system_used = Qraw_text; } else { @@ -1657,6 +1662,7 @@ /* We must return it as `COMPOUND_TEXT'. */ if (NILP (type)) type = QCOMPOUND_TEXT; } + Vlast_coding_system_used = coding.symbol; } } else if (SYMBOLP (obj))