Slava Pestov 2008-05-18 18:03:42 -05:00
parent 78fb1a5022
commit 4d10baef3d
1 changed files with 1 additions and 1 deletions

View File

@ -386,7 +386,7 @@ M: object protocol-addr
drop [ host>> ] [ port>> ] bi <inet> ;
M: https protocol-addr
call-next-method <ssl> ;
call-next-method <secure> ;
: request-addr ( request -- addr )
dup protocol>> protocol-addr ;