#lang racket/gui
(provide (all-defined-out))

(define none-given                  "[none given]")

(define error-message               "; error message: ")
(define prompt                      "; prompt: ")

(define sensitive-input         (~a "sensitive input requested" prompt))
(define normal-input            (~a "normal input requested" prompt))
(define unhandled-mimetype          "requested file is of unhandled mimetype: ")
(define permanently-redirecting     "permanently redirecting to: ")
(define temporarily-redirecting     "temporarily redirecting to: ")
(define server-unavailable      (~a "server unavailable" error-message))
(define cgi-error               (~a "cgi error" error-message))
(define proxy-error             (~a "proxy error" error-message))
(define slow-down               (~a "SLOW DOWN" error-message))
(define temporary-unspecified   (~a "unspecified temporary error" error-message))
(define file-not-found          (~a "file not found" error-message))
(define file-gone               (~a "file gone" error-message))
(define proxy-refused           (~a "proxy request refused" error-message))
(define bad-request             (~a "bad request" error-message))
(define permanent-unspecified   (~a "unspecified permanent error" error-message))
(define cert-unauthorized       (~a "client certificate not authorized" error-message))
(define cert-invalid            (~a "client certificate not valid" error-message))
(define cert-required           (~a "client certificate required" error-message))
(define bad-status                  "bad status code served: ")