From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 8 Jul 2018 14:14:06 +0000 (+0200)
Subject: Fix typo in sha1-intermediate check
X-Git-Tag: emacs-27.0.90~4706
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6de1f1592745d98e58f06332ad35efc72160787;p=emacs.git

Fix typo in sha1-intermediate check

* lisp/net/nsm.el (nsm-protocol-check--intermediate-sha1): Allow
storing the exception with a correct name.
---

diff --git a/lisp/net/nsm.el b/lisp/net/nsm.el
index 0653cfbb1a2..dab9003e023 100644
--- a/lisp/net/nsm.el
+++ b/lisp/net/nsm.el
@@ -265,7 +265,7 @@ HOST PORT STATUS OPTIONAL-PARAMETER.")
                                  (plist-get certificate :subject)))
                      (string-match "\\bSHA1\\b" algo)
                      (not (nsm-query
-                           host port status :signature-sha1
+                           host port status :intermediate-sha1
                            "An intermediate certificate used to verify the connection to %s:%s uses the SHA1 algorithm (%s), which is believed to be unsafe."
                            host port algo)))
            do (cl-return nil)