diff options
-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"), |