Mercurial > emacs
comparison src/xselect.c @ 63529:01dd74cb546e
(lisp_data_to_selection_data): Fix spelling.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Fri, 17 Jun 2005 01:06:04 +0000 |
| parents | dd37bedfb1f4 |
| children | 557271737e6b c016d82bf02b |
comparison
equal
deleted
inserted
replaced
| 63528:d6d50a511d12 | 63529:01dd74cb546e |
|---|---|
| 2029 ("elements of selection vector must be integers or conses of integers"), | 2029 ("elements of selection vector must be integers or conses of integers"), |
| 2030 Fcons (obj, Qnil))); | 2030 Fcons (obj, Qnil))); |
| 2031 | 2031 |
| 2032 /* Use sizeof(long) even if it is more than 32 bits. See comment | 2032 /* Use sizeof(long) even if it is more than 32 bits. See comment |
| 2033 in x_get_window_property and x_fill_property_data. */ | 2033 in x_get_window_property and x_fill_property_data. */ |
| 2034 | 2034 |
| 2035 if (*format_ret == 32) data_size = sizeof(long); | 2035 if (*format_ret == 32) data_size = sizeof(long); |
| 2036 *data_ret = (unsigned char *) xmalloc (*size_ret * data_size); | 2036 *data_ret = (unsigned char *) xmalloc (*size_ret * data_size); |
| 2037 for (i = 0; i < *size_ret; i++) | 2037 for (i = 0; i < *size_ret; i++) |
| 2038 if (*format_ret == 32) | 2038 if (*format_ret == 32) |
| 2039 (*((unsigned long **) data_ret)) [i] | 2039 (*((unsigned long **) data_ret)) [i] |
| 2043 = (unsigned short) cons_to_long (XVECTOR (obj)->contents [i]); | 2043 = (unsigned short) cons_to_long (XVECTOR (obj)->contents [i]); |
| 2044 } | 2044 } |
| 2045 } | 2045 } |
| 2046 else | 2046 else |
| 2047 Fsignal (Qerror, /* Qselection_error */ | 2047 Fsignal (Qerror, /* Qselection_error */ |
| 2048 Fcons (build_string ("unrecognised selection data"), | 2048 Fcons (build_string ("unrecognized selection data"), |
| 2049 Fcons (obj, Qnil))); | 2049 Fcons (obj, Qnil))); |
| 2050 | 2050 |
| 2051 *type_ret = symbol_to_x_atom (dpyinfo, display, type); | 2051 *type_ret = symbol_to_x_atom (dpyinfo, display, type); |
| 2052 } | 2052 } |
| 2053 | 2053 |
| 2830 | 2830 |
| 2831 /* Some clients (metacity for example) expects sending window to be here | 2831 /* Some clients (metacity for example) expects sending window to be here |
| 2832 when sending to the root window. */ | 2832 when sending to the root window. */ |
| 2833 event.xclient.window = to_root ? FRAME_OUTER_WINDOW (f) : wdest; | 2833 event.xclient.window = to_root ? FRAME_OUTER_WINDOW (f) : wdest; |
| 2834 | 2834 |
| 2835 | 2835 |
| 2836 memset (event.xclient.data.b, 0, sizeof (event.xclient.data.b)); | 2836 memset (event.xclient.data.b, 0, sizeof (event.xclient.data.b)); |
| 2837 x_fill_property_data (dpyinfo->display, values, event.xclient.data.b, | 2837 x_fill_property_data (dpyinfo->display, values, event.xclient.data.b, |
| 2838 event.xclient.format); | 2838 event.xclient.format); |
| 2839 | 2839 |
| 2840 /* If event mask is 0 the event is sent to the client that created | 2840 /* If event mask is 0 the event is sent to the client that created |