[Emacs-diffs] Changes to emacs/src/fns.c,v [EMACS_22_BASE]

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Stefan Monnier <monnier>        07/09/18 01:45:40

Index: fns.c
===================================================================
RCS file: /sources/emacs/emacs/src/fns.c,v
retrieving revision 1.424.2.2
retrieving revision 1.424.2.3
diff -u -b -r1.424.2.2 -r1.424.2.3
--- fns.c       25 Jul 2007 05:15:53 -0000      1.424.2.2
+++ fns.c       18 Sep 2007 01:45:39 -0000      1.424.2.3
@@ -2060,7 +2060,7 @@
       prev = tail;
       QUIT;
     }
-  newcell = Fcons (prop, Fcons (val, Qnil));
+  newcell = Fcons (prop, Fcons (val, NILP (prev) ? plist : XCDR (XCDR 
(prev))));
   if (NILP (prev))
     return newcell;
   else