* elmo-pop3.el (elmo-network-authenticate-session): Bind `sasl-mechanisms'
authorokada <okada>
Fri, 16 Feb 2001 19:12:04 +0000 (19:12 +0000)
committerokada <okada>
Fri, 16 Feb 2001 19:12:04 +0000 (19:12 +0000)
elmo/ChangeLog
elmo/elmo-pop3.el

index 6b1bd54..f851331 100644 (file)
@@ -1,3 +1,7 @@
+2000-02-17  Kenichi OKADA  <okada@opaopa.org>
+
+       * elmo-pop3.el (elmo-network-authenticate-session): Bind `sasl-mechanisms'
+
 2001-02-16  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * elmo-msgdb.el (elmo-msgdb-rename-path): Fix.
index a4539fe..cef5d97 100644 (file)
           (auth (elmo-network-session-auth-internal session))
           (auth (mapcar '(lambda (mechanism) (upcase (symbol-name mechanism)))
                         (if (listp auth) auth (list auth))))
+          (sasl-mechanisms (mapcar 'car sasl-mechanism-alist))
           client name step response mechanism
           sasl-read-passphrase)
       (or (and (string= "USER" (car auth))
             process
             (concat "AUTH " name
                     (and (sasl-step-data step)
-                         (concat 
+                         (concat
                           " "
                           (elmo-base64-encode-string
                            (sasl-step-data step) 'no-line-break))))) ;)