steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

One last fix

db4
Slava Pestov 2008-09-22 17:06:31 -05:00
parent bbdc843122
commit 977dd43d46
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/furnace/furnace.factor
View File

@ -92,7 +92,7 @@ M: object modify-form drop ;
: referrer ( -- referrer ) : referrer ( -- referrer )
#! Typo is intentional, its in the HTTP spec! #! Typo is intentional, its in the HTTP spec!
"referer" request get header>> at "referer" request get header>> at
>url [ remap-port ] change-port ; >url ensure-port [ remap-port ] change-port ;
: user-agent ( -- user-agent ) : user-agent ( -- user-agent )
"user-agent" request get header>> at "" or ; "user-agent" request get header>> at "" or ;