Mercurial > hg > xemacs-beta
comparison src/gpmevent.c @ 410:de805c49cfc1 r21-2-35
Import from CVS: tag r21-2-35
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:19:21 +0200 |
parents | 2f8bb876ab1d |
children | 697ef44129c6 |
comparison
equal
deleted
inserted
replaced
409:301b9ebbdf3b | 410:de805c49cfc1 |
---|---|
307 UNGCPRO; | 307 UNGCPRO; |
308 return (output_string); | 308 return (output_string); |
309 } | 309 } |
310 | 310 |
311 static Lisp_Object | 311 static Lisp_Object |
312 tty_selection_exists_p (Lisp_Object selection) | 312 tty_selection_exists_p (Lisp_Object selection, Lisp_Object selection_type) |
313 { | 313 { |
314 return (Qt); | 314 return (Qt); |
315 } | 315 } |
316 #endif /* TIOCLINUX */ | 316 #endif /* TIOCLINUX */ |
317 | 317 |
318 #if 0 | 318 #if 0 |
319 static Lisp_Object | 319 static Lisp_Object |
320 tty_own_selection (Lisp_Object selection_name, Lisp_Object selection_value) | 320 tty_own_selection (Lisp_Object selection_name, Lisp_Object selection_value, |
321 Lisp_Object how_to_add, Lisp_Object selection_type) | |
321 { | 322 { |
322 /* There is no way to do this cleanly - the GPM selection | 323 /* There is no way to do this cleanly - the GPM selection |
323 ** 'protocol' (actually the TIOCLINUX ioctl) requires a start and | 324 ** 'protocol' (actually the TIOCLINUX ioctl) requires a start and |
324 ** end position on the _screen_, not a string to stick in there. | 325 ** end position on the _screen_, not a string to stick in there. |
325 ** Lame. | 326 ** Lame. |