[Emacs-diffs] Changes to emacs/src/xselect.c

[Ken Raeburn]

Index: emacs/src/xselect.c
diff -c emacs/src/xselect.c:1.114 emacs/src/xselect.c:1.115
*** emacs/src/xselect.c:1.114   Tue May  7 01:46:05 2002
--- emacs/src/xselect.c Mon May 20 04:06:57 2002
***************
*** 200,208 ****
  #endif
    if (!SYMBOLP (sym)) abort ();
  
!   TRACE1 (" XInternAtom %s", (char *) XSYMBOL (sym)->name->data);
    BLOCK_INPUT;
!   val = XInternAtom (display, (char *) XSYMBOL (sym)->name->data, False);
    UNBLOCK_INPUT;
    return val;
  }
--- 200,208 ----
  #endif
    if (!SYMBOLP (sym)) abort ();
  
!   TRACE1 (" XInternAtom %s", (char *) XSTRING (SYMBOL_NAME (sym))->data);
    BLOCK_INPUT;
!   val = XInternAtom (display, (char *) XSTRING (SYMBOL_NAME (sym))->data, 
False);
    UNBLOCK_INPUT;
    return val;
  }
***************
*** 1272,1278 ****
    if (NILP (XCAR (reading_selection_reply)))
      error ("Timed out waiting for reply from selection owner");
    if (EQ (XCAR (reading_selection_reply), Qlambda))
!     error ("No `%s' selection", XSYMBOL (selection_symbol)->name->data);
  
    /* Otherwise, the selection is waiting for us on the requested property.  */
    return
--- 1272,1278 ----
    if (NILP (XCAR (reading_selection_reply)))
      error ("Timed out waiting for reply from selection owner");
    if (EQ (XCAR (reading_selection_reply), Qlambda))
!     error ("No `%s' selection", XSTRING (SYMBOL_NAME 
(selection_symbol))->data);
  
    /* Otherwise, the selection is waiting for us on the requested property.  */
    return