]> git.cworth.org Git - notmuch/blobdiff - emacs/notmuch-mua.el
emacs: use string-empty-p
[notmuch] / emacs / notmuch-mua.el
index c5b1b4829b0d1f1fcc045f4c1298b1ba97851470..08c73c1637abf4bdb88101165a5f09c9723c770b 100644 (file)
@@ -388,7 +388,7 @@ instead of `message-mode' and SWITCH-FUNCTION is mandatory."
   (interactive)
   (when notmuch-mua-user-agent-function
     (let ((user-agent (funcall notmuch-mua-user-agent-function)))
-      (unless (string= "" user-agent)
+      (unless (string-empty-p user-agent)
        (push (cons 'User-Agent user-agent) other-headers))))
   (unless (assq 'From other-headers)
     (push (cons 'From (message-make-from