: handle-put ( action -- response )
'[
- _ dup submit>> [
+ _ dup replace>> [
[ validate>> call( -- ) ]
[ authorize>> call( -- ) ]
[ replace>> call( -- response ) ]
: handle-patch ( action -- response )
'[
- _ dup submit>> [
+ _ dup update>> [
[ validate>> call( -- ) ]
[ authorize>> call( -- ) ]
[ update>> call( -- response ) ]