utf))
 
 (defun ntlm-unicode2ascii (str len)
-  "Extract 7 bits ASCII part of a little endian utf16 string STR of length
-LEN."
+  "Extract 7 bits ASCII part of a little endian utf16 string STR of length LEN."
   (let ((buf (make-string len 0)) (i 0) (j 0))
     (while (< i len)
       (aset buf i (logand (aref str j) 127)) ;(string-to-number "7f" 16)
 
 
 (defconst sasl-ntlm-steps
   '(ignore                             ;nothing to do before making
-                                       ;authentication request
     sasl-ntlm-request                  ;authentication request
     sasl-ntlm-response)                        ;response to challenge
   "A list of functions to be called in sequnece for the NTLM