diff src/fileio.c @ 101935:b6d5d903f0ce

(Fwrite_region): !NILP -> CONSP.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 11 Feb 2009 03:52:56 +0000
parents dc93dbd4d490
children 54ac3994d290
line wrap: on
line diff
--- a/src/fileio.c	Wed Feb 11 02:25:06 2009 +0000
+++ b/src/fileio.c	Wed Feb 11 03:52:56 2009 +0000
@@ -4651,7 +4651,7 @@
   specpdl_ptr = specpdl + count1;
 
   /* Call write-region-post-annotation-function. */
-  while (!NILP (Vwrite_region_annotation_buffers))
+  while (CONSP (Vwrite_region_annotation_buffers))
     {
       Lisp_Object buf = XCAR (Vwrite_region_annotation_buffers);
       if (!NILP (Fbuffer_live_p (buf)))