Mercurial > hg > xemacs-beta

comparison src/select-x.c @ 5936:574f0cded429 cygwin

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
try to replace all nnnL or nnnUL constants with EMACS_[U]INT
author Henry Thompson <ht@markup.co.uk>
date Sun, 13 Dec 2015 13:22:58 +0000
parents 2f22818d92d4
children
comparison
equal deleted inserted replaced
5935:d5eb0914ca1f 5936:574f0cded429
453 reply.selection = event->selection; 453 reply.selection = event->selection;
454 reply.time = event->time; 454 reply.time = event->time;
455 reply.target = event->target; 455 reply.target = event->target;
456 reply.property = None; 456 reply.property = None;
457 457
458 XSendEvent (reply.display, reply.requestor, False, 0L, (XEvent *) &reply); 458 XSendEvent (reply.display, reply.requestor, False, E0, (XEvent *) &reply);
459 XFlush (reply.display); 459 XFlush (reply.display);
460 } 460 }
461 461
462 462
463 /* Used as an unwind-protect clause so that, if a selection-converter signals 463 /* Used as an unwind-protect clause so that, if a selection-converter signals
516 stderr_out ("\nStoring all %d\n", bytes_remaining); 516 stderr_out ("\nStoring all %d\n", bytes_remaining);
517 #endif 517 #endif
518 XChangeProperty (display, window, reply.property, type, format, 518 XChangeProperty (display, window, reply.property, type, format,
519 PropModeReplace, data, size); 519 PropModeReplace, data, size);
520 /* At this point, the selection was successfully stored; ack it. */ 520 /* At this point, the selection was successfully stored; ack it. */
521 XSendEvent (display, window, False, 0L, (XEvent *) &reply); 521 XSendEvent (display, window, False, E0, (XEvent *) &reply);
522 XFlush (display); 522 XFlush (display);
523 } 523 }
524 else 524 else
525 { 525 {
526 #ifndef HAVE_XTREGISTERDRAWABLE 526 #ifndef HAVE_XTREGISTERDRAWABLE
566 XChangeProperty (display, window, reply.property, DEVICE_XATOM_INCR (d), 566 XChangeProperty (display, window, reply.property, DEVICE_XATOM_INCR (d),
567 32, PropModeReplace, (Rawbyte *) 567 32, PropModeReplace, (Rawbyte *)
568 &bytes_remaining, 1); 568 &bytes_remaining, 1);
569 XSelectInput (display, window, PropertyChangeMask); 569 XSelectInput (display, window, PropertyChangeMask);
570 /* Tell 'em the INCR data is there... */ 570 /* Tell 'em the INCR data is there... */
571 XSendEvent (display, window, False, 0L, (XEvent *) &reply); 571 XSendEvent (display, window, False, E0, (XEvent *) &reply);
572 XFlush (display); 572 XFlush (display);
573 573
574 /* First, wait for the requestor to ack by deleting the property. 574 /* First, wait for the requestor to ack by deleting the property.
575 This can run random lisp code (process handlers) or signal. 575 This can run random lisp code (process handlers) or signal.
576 */ 576 */
602 #if 0 602 #if 0
603 stderr_out (" INCR done\n"); 603 stderr_out (" INCR done\n");
604 #endif 604 #endif
605 if (! waiting_for_other_props_on_window (display, window)) 605 if (! waiting_for_other_props_on_window (display, window))
606 { 606 {
607 XSelectInput (display, window, 0L); 607 XSelectInput (display, window, E0);
608 XtUnregisterDrawable(display, (Drawable)window); 608 XtUnregisterDrawable(display, (Drawable)window);
609 } 609 }
610 XChangeProperty (display, window, reply.property, type, format, 610 XChangeProperty (display, window, reply.property, type, format,
611 PropModeReplace, data, 0); 611 PropModeReplace, data, 0);
612 #endif /* HAVE_XTREGISTERDRAWABLE */ 612 #endif /* HAVE_XTREGISTERDRAWABLE */