db4
Slava Pestov 2008-04-27 04:27:04 -05:00
parent 9a5d34ae7b
commit e48755e5aa
2 changed files with 2 additions and 2 deletions

View File

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

View File

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