Fix
parent
78fb1a5022
commit
4d10baef3d
|
@ -386,7 +386,7 @@ M: object protocol-addr
|
||||||
drop [ host>> ] [ port>> ] bi <inet> ;
|
drop [ host>> ] [ port>> ] bi <inet> ;
|
||||||
|
|
||||||
M: https protocol-addr
|
M: https protocol-addr
|
||||||
call-next-method <ssl> ;
|
call-next-method <secure> ;
|
||||||
|
|
||||||
: request-addr ( request -- addr )
|
: request-addr ( request -- addr )
|
||||||
dup protocol>> protocol-addr ;
|
dup protocol>> protocol-addr ;
|
||||||
|
|
Loading…
Reference in New Issue