;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: encryption, security, network
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: encryption, security, network
"If non-nil, the connection is opened in a non-interactive context.
This means that no queries should be performed.")
"If non-nil, the connection is opened in a non-interactive context.
This means that no queries should be performed.")
(defun nsm-verify-connection (process host port &optional
save-fingerprint warn-unencrypted)
"Verify the security status of PROCESS that's connected to HOST:PORT.
(defun nsm-verify-connection (process host port &optional
save-fingerprint warn-unencrypted)
"Verify the security status of PROCESS that's connected to HOST:PORT.
(defun nsm-check-certificate (process host port status settings)
(let ((warnings (plist-get status :warnings)))
(cond
(defun nsm-check-certificate (process host port status settings)
(let ((warnings (plist-get status :warnings)))
(cond
(goto-char start)
;; Fill the first line of the message, which usually
;; contains lots of explanatory text.
(goto-char start)
;; Fill the first line of the message, which usually
;; contains lots of explanatory text.