X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch-parser.el;fp=emacs%2Fnotmuch-parser.el;h=fbcfc2efb4e6ca624a17198c4b84fc37669e5ec5;hp=06e7487bd3270bcd3e424927abd62cbc6acf6f8f;hb=09f6533c3781b61ea634790d4bad38aadf89115c;hpb=dfb1b8eb89e814f4bf6f6e62b700c72aa1b4659a

diff --git a/emacs/notmuch-parser.el b/emacs/notmuch-parser.el
index 06e7487b..fbcfc2ef 100644
--- a/emacs/notmuch-parser.el
+++ b/emacs/notmuch-parser.el
@@ -78,7 +78,7 @@ returns the value."
 	 ;; parse, extend the partial parse to figure out when we
 	 ;; have a complete list.
 	 (catch 'return
-	   (when (null (notmuch-sexp--partial-state sp))
+	   (unless (notmuch-sexp--partial-state sp)
 	     (let ((start (point)))
 	       (condition-case nil
 		   (throw 'return (read (current-buffer)))