summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-07-09 02:02:33 +0000
committerKenichi Handa <handa@m17n.org>1998-07-09 02:02:33 +0000
commit061bda8dfd24c7f4c6396941d4352264c543613e (patch)
tree58d677fe4b92f3dd623451c10da7e00f89b6a781
parent4e8b7ae5c1690718c8b5d7b67ed17d367d89f690 (diff)
downloademacs-061bda8dfd24c7f4c6396941d4352264c543613e.tar.gz
(selection_data_to_lisp_data): Set Vlast_coding_system_used.
(lisp_data_to_selection_data): Likewize.
-rw-r--r--src/xselect.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/xselect.c b/src/xselect.c
index 969fd4e4148..713db184ef8 100644
--- a/src/xselect.c
+++ b/src/xselect.c
@@ -1494,7 +1494,10 @@ selection_data_to_lisp_data (display, data, size, type, format)
}
}
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 @@ selection_data_to_lisp_data (display, data, size, type, format)
: 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 @@ lisp_data_to_selection_data (display, obj,
/* 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 @@ lisp_data_to_selection_data (display, obj,
/* We must return it as `COMPOUND_TEXT'. */
if (NILP (type)) type = QCOMPOUND_TEXT;
}
+ Vlast_coding_system_used = coding.symbol;
}
}
else if (SYMBOLP (obj))