From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 24 Jun 2018 13:40:43 +0000 (+0200)
Subject: Fix reverse test in previous check-in
X-Git-Tag: emacs-27.0.90~4773
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eaa054a94b786ce7dc4169c9b14893f50335f657;p=emacs.git

Fix reverse test in previous check-in

* lisp/net/nsm.el (nsm-check-protocol): Fix reverse test in
previous check-in.
---

diff --git a/lisp/net/nsm.el b/lisp/net/nsm.el
index 8f09e8dfa91..97bfc7d62f1 100644
--- a/lisp/net/nsm.el
+++ b/lisp/net/nsm.el
@@ -202,8 +202,8 @@ HOST PORT STATUS OPTIONAL-PARAMETER.")
            ;; Skip the check if the user has already said that this
            ;; host is OK for this type of "error".
            when (and (not (memq type (plist-get settings :conditions)))
-                     (< (nsm-level network-security-level)
-                        (nsm-level (cadr check))))
+                     (>= (nsm-level network-security-level)
+                         (nsm-level (cadr check))))
            do (let ((result
                      (funcall (intern (format "nsm-protocol-check--%s"
                                               (car check))