Remove some compat code in imap.el
* lisp/net/imap.el (imap-sasl-auth-p): Remove old-Emacs compat code.
This commit is contained in:
parent
fc6de411a7
commit
842518a0db
1 changed files with 2 additions and 4 deletions
|
@ -904,10 +904,8 @@ t if it successfully authenticates, nil otherwise."
|
|||
(declare-function sasl-step-set-data "sasl" (step data))
|
||||
|
||||
(defun imap-sasl-auth-p (buffer)
|
||||
(and (condition-case ()
|
||||
(require 'sasl)
|
||||
(error nil))
|
||||
(sasl-find-mechanism (imap-sasl-make-mechanisms buffer))))
|
||||
(require 'sasl)
|
||||
(sasl-find-mechanism (imap-sasl-make-mechanisms buffer)))
|
||||
|
||||
(defun imap-sasl-auth (buffer)
|
||||
"Login to server using the SASL method."
|
||||
|
|
Loading…
Add table
Reference in a new issue