diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-19 10:54:09 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-19 10:54:09 +0200 |
| commit | 842518a0dbc1f84705784f9a34ab9dd2cf29015e (patch) | |
| tree | 7a715d449bbb4d132b40ea948a11fe3afebdf0b2 /lisp/net/imap.el | |
| parent | fc6de411a7afeeb197eef0a23b83a5ea9a14bbc6 (diff) | |
| download | emacs-842518a0dbc1f84705784f9a34ab9dd2cf29015e.tar.gz | |
Remove some compat code in imap.el
* lisp/net/imap.el (imap-sasl-auth-p): Remove old-Emacs compat code.
Diffstat (limited to 'lisp/net/imap.el')
| -rw-r--r-- | lisp/net/imap.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/net/imap.el b/lisp/net/imap.el index 71d19185ff3..4601e84b22e 100644 --- a/lisp/net/imap.el +++ b/lisp/net/imap.el @@ -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." |