Mercurial > hg > xemacs-beta
comparison src/select-gtk.c @ 4982:3c3c1d139863
Automatic merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Fri, 05 Feb 2010 11:25:00 -0600 |
parents | 4aebb0131297 16112448d484 |
children | 358aa3bb603f |
comparison
equal
deleted
inserted
replaced
4981:4aebb0131297 | 4982:3c3c1d139863 |
---|---|
211 /* #### is this right? */ | 211 /* #### is this right? */ |
212 (unsigned int) size); | 212 (unsigned int) size); |
213 successful_p = Qt; | 213 successful_p = Qt; |
214 /* Tell x_selection_request_lisp_error() it's cool. */ | 214 /* Tell x_selection_request_lisp_error() it's cool. */ |
215 cl->successful = TRUE; | 215 cl->successful = TRUE; |
216 xfree (data, Rawbyte *); | 216 xfree (data); |
217 } | 217 } |
218 | 218 |
219 unbind_to (count); | 219 unbind_to (count); |
220 | 220 |
221 DONE_LABEL: | 221 DONE_LABEL: |
222 | 222 |
223 if (cl) | 223 if (cl) |
224 xfree (cl, struct _selection_closure *); | 224 xfree (cl); |
225 | 225 |
226 UNGCPRO; | 226 UNGCPRO; |
227 | 227 |
228 /* Let random lisp code notice that the selection has been asked for. */ | 228 /* Let random lisp code notice that the selection has been asked for. */ |
229 { | 229 { |