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

Fixes

db4
Slava Pestov 2008-04-27 04:27:04 -05:00
parent 9a5d34ae7b
commit e48755e5aa
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/http/http.factor
View File

@ -149,7 +149,7 @@ TUPLE: cookie name value path domain expires max-age http-only ;
";" split [ ";" split [
[ blank? ] trim "=" split1 swap >lower { [ blank? ] trim "=" split1 swap >lower {
{ "expires" [ cookie-string>timestamp >>expires ] } { "expires" [ cookie-string>timestamp >>expires ] }
{ "max-age" [ string>number seconds ] } { "max-age" [ string>number seconds >>max-age ] }
{ "domain" [ >>domain ] } { "domain" [ >>domain ] }
{ "path" [ >>path ] } { "path" [ >>path ] }
{ "httponly" [ drop t >>http-only ] } { "httponly" [ drop t >>http-only ] }

2
extra/http/server/templating/chloe/chloe.factor
View File

@ -22,7 +22,7 @@ DEFER: process-template
: chloe-ns "http://factorcode.org/chloe/1.0" ; inline : chloe-ns "http://factorcode.org/chloe/1.0" ; inline
: filter-chloe-attrs ( assoc -- assoc' ) : filter-chloe-attrs ( assoc -- assoc' )
[ drop name-url chloe-ns = not ] assoc-subset ; [ drop name-url chloe-ns = not ] assoc-filter ;
: chloe-tag? ( tag -- ? ) : chloe-tag? ( tag -- ? )
{ {