(defvar url-request-method nil "The method to use for the next request.")
-(defvar url-mime-encoding-string (and (fboundp 'zlib-decompress-region)
+(defvar url-mime-encoding-string (and (fboundp 'zlib-available-p)
(zlib-available-p)
"gzip")
"String to send in the Accept-encoding: field in HTTP requests.")