diff options
author | Stefan Monnier <[email protected]> | 2011-07-24 10:01:58 -0400 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2011-07-24 10:01:58 -0400 |
commit | 14486a1036dc8192ebc75a43a3e6c75fa5c8683f (patch) | |
tree | 3e1aa930a13037076bca17f825a354e57bcbe9b8 | |
parent | 0b3f36df8c6eae67c267ebe4de0cb4006e0c7251 (diff) |
* src/xml.c: Fix Lisp_Object/int mixup.
-rw-r--r-- | src/xml.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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"), |