Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

mark 1.0.2

  • Loading branch information...
commit 3419cdefd0d378feb0f4d68a4f2021dd82f49c50 1 parent f25ea31
Zach Tellman authored
Showing with 16 additions and 16 deletions.
  1. +3 −3 project.clj
  2. +12 −12 src/aloha/requests.clj
  3. +1 −1  src/aloha/responses.clj
6 project.clj
View
@@ -1,4 +1,4 @@
-(defproject aloha "1.0.2-SNAPSHOT"
+(defproject aloha "1.0.2"
:description "a simple, friendly webserver"
:repositories {"jboss" "http://repository.jboss.org/nexus/content/groups/public/"
"sonatype-oss-public" "https://oss.sonatype.org/content/groups/public/"}
@@ -8,8 +8,8 @@
:main aloha.core
:dependencies [[org.clojure/clojure "1.4.0"]
[org.clojure/tools.logging "0.2.3"]
- [io.netty/netty "3.5.11.Final"]
+ [io.netty/netty "3.6.2.Final"]
[clj-http "0.3.6"]
[org.clojure/tools.cli "0.2.1"]
- [potemkin "0.2.0-SNAPSHOT"]]
+ [potemkin "0.2.0"]]
:jvm-opts ["-server" "-XX:+UseConcMarkSweepGC"])
24 src/aloha/requests.clj
View
@@ -47,18 +47,18 @@
(dissoc [this k]
(dissoc (into {} this) k))
(keys [this]
- [:scheme
- :remote-addr
- :server-name
- :server-port
- :request-method
- :headers
- :content-type
- :character-encoding
- :uri
- :query-string
- :content-length
- :body]))
+ #{:scheme
+ :remote-addr
+ :server-name
+ :server-port
+ :request-method
+ :headers
+ :content-type
+ :character-encoding
+ :uri
+ :query-string
+ :content-length
+ :body}))
(defn transform-netty-request [^Channel channel ^HttpRequest netty-request]
(RequestMap.
2  src/aloha/responses.clj
View
@@ -136,6 +136,6 @@
(HttpResponseStatus/valueOf (:status rsp)))]
(doseq [[k v] (:headers rsp)]
(.setHeader response (format-header-key k) v))
- (.setHeader response "Server" "aloha (1.0.0)")
+ (.setHeader response "Server" "aloha/1.0.2")
(.setHeader response "Connection" (if keep-alive? "keep-alive" "close"))
response))
Please sign in to comment.
Something went wrong with that request. Please try again.