# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1042551374 0
# Node ID a3af03912e6f7ad5052836280d463e192b36f015
# Parent  ac42843384b3e3fc73cd85844b5bf011d456a146
(Fset_process_plist): Fixed return value.

diff -r ac42843384b3 -r a3af03912e6f src/process.c
--- a/src/process.c	Tue Jan 14 10:18:36 2003 +0000
+++ b/src/process.c	Tue Jan 14 13:36:14 2003 +0000
@@ -1049,7 +1049,7 @@
 
 DEFUN ("set-process-plist", Fset_process_plist, Sset_process_plist,
        2, 2, 0,
-       doc: /* Replace the plist of PROCESS with PLIST.  */)
+       doc: /* Replace the plist of PROCESS with PLIST.  Returns PLIST.  */)
      (process, plist)
      register Lisp_Object process, plist;
 {
@@ -1057,6 +1057,7 @@
   CHECK_LIST (plist);
 
   XPROCESS (process)->plist = plist;
+  return plist;
 }
 
 #if 0 /* Turned off because we don't currently record this info