From: Jason Rumney <jasonr@gnu.org>
Date: Wed, 20 Mar 2002 20:37:41 +0000 (+0000)
Subject: (QCfamily, QCfiler): Remove duplicate declaration and initialization.
X-Git-Tag: ttn-vms-21-2-B4~16065
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3635ecad99b30100ec673c93d6a496df68ad4f9d;p=emacs.git

(QCfamily, QCfiler): Remove duplicate declaration and initialization.
---

diff --git a/src/process.c b/src/process.c
index 4483dfa330f..00bc4b2f0a3 100644
--- a/src/process.c
+++ b/src/process.c
@@ -126,11 +126,15 @@ Lisp_Object Qprocessp;
 Lisp_Object Qrun, Qstop, Qsignal;
 Lisp_Object Qopen, Qclosed, Qconnect, Qfailed, Qlisten;
 Lisp_Object Qlocal;
-Lisp_Object QCname, QCbuffer, QChost, QCservice, QCfamily;
+Lisp_Object QCname, QCbuffer, QChost, QCservice;
 Lisp_Object QClocal, QCremote, QCcoding;
 Lisp_Object QCserver, QCdatagram, QCnowait, QCnoquery, QCstop;
-Lisp_Object QCfilter, QCsentinel, QClog, QCoptions, QCfeature;
+Lisp_Object QCsentinel, QClog, QCoptions, QCfeature;
 Lisp_Object Qlast_nonmenu_event;
+/* QCfamily is declared and initialized in xfaces.c,
+   QCfilter in keyboard.c.  */
+extern Lisp_Object QCfamily, QCfilter;
+
 /* Qexit is declared and initialized in eval.c.  */
 
 /* a process object is a network connection when its childp field is neither
@@ -6174,8 +6178,6 @@ syms_of_process ()
   staticpro (&QChost);
   QCservice = intern (":service");
   staticpro (&QCservice);
-  QCfamily = intern (":family");
-  staticpro (&QCfamily);
   QClocal = intern (":local");
   staticpro (&QClocal);
   QCremote = intern (":remote");
@@ -6188,8 +6190,6 @@ syms_of_process ()
   staticpro (&QCdatagram);
   QCnowait = intern (":nowait");
   staticpro (&QCnowait);
-  QCfilter = intern (":filter");
-  staticpro (&QCfilter);
   QCsentinel = intern (":sentinel");
   staticpro (&QCsentinel);
   QClog = intern (":log");