Fix saving certificates in the NSM on high security levels

* lisp/net/nsm.el (nsm-check-certificate): `nsm-fingerprint-ok-p'
will save the fingerprint in the correct temporary/permanent
storage, so saving it once more (in the permanent storage) if the
security level is high or greater is a mistake (bug#27823).

diff --git a/lisp/net/nsm.el b/lisp/net/nsm.el
index 6a312e2ebb456e58060c85e03079cb6108ee0dcd..dbfa2101f0c230ec9159a72b5a97ee425c3b7e3d 100644 (file)
--- a/lisp/net/nsm.el
+++ b/lisp/net/nsm.el
@@ -149,11 +149,6 @@ unencrypted."
             (not (nsm-new-fingerprint-ok-p host port status)))
        (delete-process process)
        nil)
-       ((>= (nsm-level network-security-level) (nsm-level 'high))
-       ;; Save the host fingerprint so that we can check it the
-       ;; next time we connect.
-       (nsm-save-host host port status 'fingerprint 'always)
-       process)
        (t
        process)))