30 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			30 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			Factor
		
	
	
| USING: help.markup help.syntax io.streams.string strings
 | |
| http math ;
 | |
| IN: http.server.responses
 | |
| 
 | |
| HELP: <content>
 | |
| { $values { "body" "a response body" } { "content-type" string } { "response" response } }
 | |
| { $description "Creates a successful HTTP response which sends a response body with the specified content type to the client." } ;
 | |
| 
 | |
| HELP: <trivial-response>
 | |
| { $values { "code" integer } { "message" string } { "response" response } }
 | |
| { $description "Creates an HTTP error response." }
 | |
| { $examples
 | |
|     { $code
 | |
|         "USE: http.server.responses"
 | |
|         "415 \"Unsupported Media Type\" <trivial-response>"
 | |
|     }
 | |
| } ;
 | |
| 
 | |
| ARTICLE: "http.server.responses" "Canned HTTP responses"
 | |
| "The " { $vocab-link "http.server.responses" } " vocabulary provides constructors for a few useful " { $link response } " objects."
 | |
| { $subsection <content> }
 | |
| { $subsection <304> }
 | |
| { $subsection <403> }
 | |
| { $subsection <400> }
 | |
| { $subsection <404> }
 | |
| "New error responses like the above can be created for other error codes too:"
 | |
| { $subsection <trivial-response> } ;
 | |
| 
 | |
| ABOUT: "http.server.responses"
 |