コンポジットレスポンスにコンテンツタイプを明示的に設定するにはどうすればよいですか？

Question

私はcompojure-apiで遊んでいて、単純なwebappのContent-Typeを管理しようとするとブロックされています。私が望むのは、プレーン/テキストのHTTPレスポンスを出すことですが、何とかCompojure-APIはそれを "application/json"に設定し続けます。

(POST "/echo" [] 
     :new-relic-name "/v1/echo" 
     :summary "info log the input message and echo it back" 
     :description nil 
     :return String 
     :form-params [message :- String] 
     (log/infof "/v1/echo message: %s" message) 
     (let [resp (-> (resp/response message) 
        (resp/status 200) 
        (resp/header "Content-Type" "text/plain"))] 
     (log/infof "response is %s" resp) 
     resp)) 

ただし、curlはサーバーがContent-Type：application/jsonに応答したことを示します。

$ curl -X POST -i --header 'Content-Type: application/x-www-form-urlencoded' -d 'message=frickin compojure-api' 'http://localhost:8080/v1/echo' 
HTTP/1.1 200 OK 
Date: Fri, 13 Jan 2017 02:04:47 GMT 
Content-Type: application/json; charset=utf-8 
x-http-request-id: 669dee08-0c92-4fb4-867f-67ff08d7b72f 
x-http-caller-id: UNKNOWN_CALLER 
Content-Length: 23 
Server: Jetty(9.2.10.v20150310) 

私のロギングは、機能が「プレーン/テキスト」を要求したが、何らかの形でフレームワークがそれを破棄したことを示しています。

2017-01-12 18:04:47,581 INFO [qtp789647098-46]kthxbye.v1.api [669dee08-0c92-4fb4-867f-67ff08d7b72f] - response is {:status 200, :headers {"Content-Type" "text/plain"}, :body "frickin compojure-api"} 

どのようにしてCompojure-APIリングアプリケーションでContent-Typeを制御できますか？

Answer 1

compojure-apiは、HTTP Acceptヘッダーを使用して示されたHTTPクライアントから要求された形式の応答を提供します。あなたが追加する必要がカールして

：

-H "Accept: text/plain"

あなたはまた、許容可能な形式のリストを提供することができ、サーバはそのリストから最初のサポートされている形式でレスポンスを提供します：

-H "Accept: text/plain, text/html, application/xml, application/json, */*"

Answer 2

私はコンポジットを試したことがないので、ここには何も入っていません。

1.）y

2.混乱

の一種）のparamsへのアクセスを得るために - - 私たちの地元のval repsは、エイリアスの名前空間と同じ名前を持つそうです - あなたはあなたのルート

3.

）ああ ring.middleware.params/wrap-paramsを適用する必要がありそうContent-Type： wrap-paramsが見つからないため配信されなかった :form-paramsが必要なため、何らかの種類のデフォルトルートになったため、 text/plainではありません。それは私が起こったと思うもの、少なくとも。

(require '[compojure.core :refer :all]) 
(require '[ring.util.response :as resp]) 
(require '[ring.server.standalone :as server]) 
(require '[ring.middleware.params :refer [wrap-params]]) 

(def x 
    (POST "/echo" [message] 
     :summary "info log the input message and echo it back" 
     :description nil 
     :return String 
     :form-params [message :- String] 
     (let [resp (-> (resp/response (str "message: " message)) 
        (resp/status 200) 
        (resp/header "Content-Type" "text/plain"))] 
     resp))) 

(defroutes app (wrap-params x)) 

(server/serve app {:port 4042}) 

試験：

curl -X POST -i --header 'Content-Type: application/x-www-form-urlencoded' -d 'message=frickin' 'http://localhost:4042/echo' 
HTTP/1.1 200 OK 
Date: Fri, 13 Jan 2017 17:32:03 GMT 
Content-Type: text/plain;charset=ISO-8859-1 
Content-Length: 14 
Server: Jetty(7.6.13.v20130916) 

message: frickin