Mercurial > emacs
comparison src/xselect.c @ 21654:8f2af8f84898
(Fx_get_cut_buffer_internal): If FORMAT is 0, cut buffer is empty.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 18 Apr 1998 22:14:32 +0000 |
| parents | fa9ff387d260 |
| children | a3a1164f9ad9 |
comparison
equal
deleted
inserted
replaced
| 21653:e95a88dc6110 | 21654:8f2af8f84898 |
|---|---|
| 2092 CHECK_CUT_BUFFER (buffer, 0); | 2092 CHECK_CUT_BUFFER (buffer, 0); |
| 2093 buffer_atom = symbol_to_x_atom (dpyinfo, display, buffer); | 2093 buffer_atom = symbol_to_x_atom (dpyinfo, display, buffer); |
| 2094 | 2094 |
| 2095 x_get_window_property (display, window, buffer_atom, &data, &bytes, | 2095 x_get_window_property (display, window, buffer_atom, &data, &bytes, |
| 2096 &type, &format, &size, 0); | 2096 &type, &format, &size, 0); |
| 2097 if (!data) return Qnil; | 2097 if (!data || !format) |
| 2098 return Qnil; | |
| 2098 | 2099 |
| 2099 if (format != 8 || type != XA_STRING) | 2100 if (format != 8 || type != XA_STRING) |
| 2100 Fsignal (Qerror, | 2101 Fsignal (Qerror, |
| 2101 Fcons (build_string ("cut buffer doesn't contain 8-bit data"), | 2102 Fcons (build_string ("cut buffer doesn't contain 8-bit data"), |
| 2102 Fcons (x_atom_to_symbol (dpyinfo, display, type), | 2103 Fcons (x_atom_to_symbol (dpyinfo, display, type), |