[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/xselect.c
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/src/xselect.c |
Date: |
Sun, 06 Apr 2003 16:35:06 -0400 |
Index: emacs/src/xselect.c
diff -c emacs/src/xselect.c:1.127 emacs/src/xselect.c:1.128
*** emacs/src/xselect.c:1.127 Wed Mar 12 18:48:40 2003
--- emacs/src/xselect.c Sun Apr 6 16:35:06 2003
***************
*** 425,430 ****
--- 425,433 ----
CHECK_SYMBOL (target_type);
handler_fn = Fcdr (Fassq (target_type, Vselection_converter_alist));
+ /* gcpro is not needed here since nothing but HANDLER_FN
+ is live, and that ought to be a symbol. */
+
if (!NILP (handler_fn))
value = call3 (handler_fn,
selection_symbol, (local_request ? Qnil : target_type),
***************
*** 837,844 ****
DONE:
- UNGCPRO;
-
/* Let random lisp code notice that the selection has been asked for. */
{
Lisp_Object rest;
--- 840,845 ----
***************
*** 847,852 ****
--- 848,855 ----
for (; CONSP (rest); rest = Fcdr (rest))
call3 (Fcar (rest), selection_symbol, target_symbol, successful_p);
}
+
+ UNGCPRO;
}
/* Handle a SelectionClear event EVENT, which indicates that some