                       {:schema schema})))
     (t/track
       "Converting vector schema."
-      (let [[swagger-object' item-reference] (simple->swagger-schema swagger-options swagger-object (first schema))]
-        [swagger-object' {:type  :array
-                          :items item-reference}])))
+      (let [item-schema (first schema)
+            [swagger-object' item-reference] (simple->swagger-schema swagger-options swagger-object item-schema)]
+        [swagger-object' (merge-in-description {:type  :array
+                                                :items item-reference}
+                                               schema)])))
 
   IPersistentMap
   (convert-schema [schema swagger-options swagger-object]


  EnumSchema
  (convert-schema [schema _ swagger-object]
    [swagger-object {:type :string                          ; an assumption
                     :enum (unwrap-schema schema)}])

  Maybe
  (convert-schema [schema swagger-options swagger-object]
    (let [[swagger-object' swagger-schema] (simple->swagger-schema swagger-options swagger-object (unwrap-schema schema))]
      [swagger-object' (assoc swagger-schema :allowEmptyValue true)]))

  AnythingSchema
  (convert-schema [schema swagger-options swagger-object]
    [swagger-object {:type :object}])

  Both
  (convert-schema [schema swagger-options swagger-object]

                      :else
                      (t/track
                        #(format "Describing query parameter `%s'." (name k))
                        (let [[swagger-object' swagger-schema] (simple->swagger-schema swagger-options so key-schema)
                              full-description (-> swagger-schema
                                                   (assoc :name k
                                                          :in :query
                                                          :required required)
                                                   (merge-in-description key-schema))]
                          (update-in swagger-object' params-key
                                     conj full-description)))))]
      (reduce reducer swagger-object schema))
