This commit was generated by cvs2svn to compensate for changes in r2827,

[chise/xemacs-chise.git] / src / select.c

diff --git a/src/select.c b/src/select.c
index 891a45c..ecc22ca 100644 (file)
--- a/src/select.c
+++ b/src/select.c
@@ -203,7 +203,6 @@ anything that the functions on selection-converter-alist know about.
        (selection_name, selection_value, device))
 {
   Lisp_Object selection_time, selection_data, prev_value;
-  struct gcpro gcpro1;
 
   CHECK_SYMBOL (selection_name);
   if (NILP (selection_value)) error ("selection-value may not be nil.");
@@ -215,8 +214,6 @@ anything that the functions on selection-converter-alist know about.
   selection_data = list3 (selection_name,
                          selection_value,
                          Qnil);
-  GCPRO1 (selection_data);
-
   prev_value = assq_no_quit (selection_name, Vselection_alist);
   Vselection_alist = Fcons (selection_data, Vselection_alist);
     
@@ -245,8 +242,6 @@ anything that the functions on selection-converter-alist know about.
 
   Fsetcar (XCDR (XCDR (selection_data)), selection_time);
 
-  UNGCPRO;
-
   return selection_value;
 }