Merge branch 'master' into new_ui
commit
5d4a113e60
|
@ -308,7 +308,7 @@ SYMBOL: a
|
|||
<dispatcher>
|
||||
<action>
|
||||
[ a get-global "a" set-value ] >>init
|
||||
[ [ "a" <field> render ] "text/html" <content> ] >>display
|
||||
[ [ "<html>" write "a" <field> render "</html>" write ] "text/html" <content> ] >>display
|
||||
[ { { "a" [ v-integer ] } } validate-params ] >>validate
|
||||
[ "a" value a set-global URL" " <redirect> ] >>submit
|
||||
<conversations>
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2007, 2008 Doug Coleman.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: accessors alien alien.accessors arrays assocs
|
||||
combinators.short-circuit fry hashtables html io
|
||||
combinators.short-circuit fry hashtables io
|
||||
kernel math namespaces prettyprint quotations sequences
|
||||
sequences.deep sets slots.private vectors vocabs words
|
||||
kernel.private ;
|
||||
|
@ -54,7 +54,7 @@ SYMBOL: def-hash-keys
|
|||
[ drop f ]
|
||||
[ "cdecl" ]
|
||||
[ first ] [ second ] [ third ] [ fourth ]
|
||||
[ ">" write-html ] [ "/>" write-html ]
|
||||
[ ">" write ] [ "/>" write ]
|
||||
} ;
|
||||
|
||||
! ! Add definitions
|
||||
|
|
Loading…
Reference in New Issue