From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sun, 24 Jul 2011 14:01:58 +0000 (-0400)
Subject: * src/xml.c: Fix Lisp_Object/int mixup.
X-Git-Tag: emacs-pretest-24.0.90~104^2~164^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=14486a1036dc8192ebc75a43a3e6c75fa5c8683f;p=emacs.git

* src/xml.c: Fix Lisp_Object/int mixup.
---

diff --git a/src/xml.c b/src/xml.c
index 600dcd11616..55352baae3a 100644
--- a/src/xml.c
+++ b/src/xml.c
@@ -128,13 +128,13 @@ parse_region (Lisp_Object start, Lisp_Object end, Lisp_Object base_url, int html
       Lisp_Object r = Qnil;
 
       while (n) {
-	if (r != Qnil)
+	if (!NILP (r))
 	  result = Fcons (r, result);
 	r = make_dom (n);
 	n = n->next;
       }
 
-      if (result == Qnil)
+      if (NILP (result))
 	result = r;
       else
 	result = Fcons (intern ("top"),