From: okada Date: Fri, 19 Nov 1999 03:21:01 +0000 (+0000) Subject: rename sasl-plain sasl-cram-md5 X-Git-Tag: slim-1_13_0~2 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d2ad68280424a993314f89d3e919f0b932ec8d2e;p=elisp%2Fflim.git rename sasl-plain sasl-cram-md5 --- diff --git a/ChangeLog b/ChangeLog index e8e6c0a..43efe3c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,10 @@ 1999-10-19 Kenichi OKADA + * sasl.el (sasl-plain): Renamed from plain-encode. + * sasl.el (sasl-cram-md5): Renamed from cram-md5-encode. + +1999-10-19 Kenichi OKADA + * hmac-md5.el (hmac-md5): fixed for XEmacs's md5. 1999-10-19 Kenichi OKADA diff --git a/sasl.el b/sasl.el index 9d1a368..9709927 100644 --- a/sasl.el +++ b/sasl.el @@ -27,12 +27,12 @@ (require 'hmac-md5) (require 'hmac-util) -(defun cram-md5-encode (user passphrase response) +(defun sasl-cram-md5 (user passphrase response) (concat user " " (hmac-hex-string (hmac-md5 response passphrase)))) -(defun plain-encode (authorid authenid passphrase) +(defun sasl-plain (authorid authenid passphrase) (concat authorid "\0" authenid "\0" passphrase)) (provide 'sasl)