bug#12599: 24.2.50; wrong-number-of-arguments when using url-retrieve with https URL

[Christoph Scholtes <cschol2112@gmail.com>]

emacs -Q

Evaluate the following in *scratch*:

(url-retrieve
"https://www.gnu.org"
(lambda (s) (message "GNU!")))

The following backtrace is shown:

Debugger entered--Lisp error: (wrong-number-of-arguments #[(url callback 
cbargs) "\304\305
\v#)\207" [url-gateway-method url callback cbargs tls url-http] 4 
("/home/schroeder/devel/emacs/trunk/lisp/url/url-http.elc" . 35607)] 1)
url-https([cl-struct-url "https" nil nil "www.gnu.org" nil "/" nil nil t 
nil t])
url-retrieve-internal("https://www.gnu.org" (lambda (s) (message 
"GNU!")) (nil) nil nil)
url-retrieve("https://www.gnu.org" (lambda (s) (message "GNU!")))
eval((url-retrieve "https://www.gnu.org" (lambda (s) (message "GNU!"))) 
nil)
eval-last-sexp-1(nil)
eval-last-sexp(nil)
call-interactively(eval-last-sexp nil nil)

This only happens with a https URL. Same function with a http version
works as expected.



In GNU Emacs 24.2.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.24.10)
of 2012-10-07 on marvin
Bzr revision: 110431 fabian@anue.biz-20121007193737-y7fsm9ts74jks2so
Windowing system distributor `The X.Org Foundation', version 11.0.11103000
System Description: Ubuntu 12.04.1 LTS

Configured using:
`configure 'CC=clang''

Important settings:
value of $LANG: en_US.UTF-8
locale-coding-system: utf-8-unix
default enable-multibyte-characters: t

Major mode: Debugger

Minor modes in effect:
tooltip-mode: t
mouse-wheel-mode: t
tool-bar-mode: t
menu-bar-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
font-lock-mode: t
blink-cursor-mode: t
auto-composition-mode: t
auto-encryption-mode: t
auto-compression-mode: t
buffer-read-only: t
line-number-mode: t
transient-mark-mode: t

Recent input:
C-y C-p C-p C-p C-p C-p C-p C-p C-p C-p C-p C-p C-p
C-p C-p C-p C-SPC C-SPC C-SPC C-n C-n C-n C-n C-n C-n
C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n <backspace>
C-p C-p C-p C-p C-p C-p C-p C-p C-SPC C-SPC C-n C-n
C-n <backspace> C-a C-p C-p C-SPC C-n C-n C-n <backspace>
C-n C-n C-e C-x C-e M-x r e p o r t <tab> <return>

Recent messages:
For information about GNU Emacs and the GNU system, type C-h C-a.
Mark set [2 times]
Mark deactivated
Mark activated
byte-code: End of buffer
Mark set
Mark deactivated
Mark activated
Entering debugger...

Load-path shadows:
None found.

Features:
(shadow sort mail-extr emacsbug message format-spec rfc822 mml mml-sec
mm-decode mm-bodies mm-encode mailabbrev gmm-utils mailheader sendmail
mail-utils help-mode easymenu debug url-http tls mail-parse rfc2231
rfc2047 rfc2045 ietf-drums url-gw url-cache url-auth url url-proxy
url-privacy url-expand url-methods url-history url-cookie url-domsuf
url-util url-parse auth-source eieio byte-opt bytecomp byte-compile
cconv gnus-util mm-util mail-prsvr password-cache url-vars mailcap
time-date tooltip ediff-hook vc-hooks lisp-float-type mwheel x-win x-dnd
tool-bar dnd fontset image regexp-opt fringe tabulated-list newcomment
lisp-mode register page menu-bar rfn-eshadow timer select scroll-bar
mouse jit-lock font-lock syntax facemenu font-core frame cham georgian
utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean
japanese hebrew greek romanian slovak czech european ethiopic indian
cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abbrev
minibuffer loaddefs button faces cus-face macroexp files text-properties
overlay sha1 md5 base64 format env code-pages mule custom widget
hashtable-print-readable backquote make-network-process dbusbind
dynamic-setting system-font-setting font-render-setting move-toolbar gtk
x-toolkit x multi-tty emacs)