 ;; ## Multiplexing Codec
 
 (defrecord MuxCodec
-  [header codecs]
+  [codecs]
 
   codec/Encoder
 

      (throw (IllegalArgumentException.
               (str "Every codec must specify a header path: "
                    (pr-str bad-codecs)))))
    (MuxCodec. "/multicodec" codec-map)))


;; Remove automatic constructor functions.

  codec/Decoder

  (decodable?
    [this header]
    (boolean (find-decodable codecs header)))


  (decode!
    [this input]
    (let [header (header/read-header! input)
          [codec-key codec] (find-decodable codecs header)]
      (when-not codec
        (throw (ex-info
                 (str "No codecs can decode header: " (pr-str header))
                 {:codecs (keys codecs)
                  :header header})))
      (when (thread-bound? #'*dispatched-codec*)
        (set! *dispatched-codec* codec-key))
      (codec/decode! codec input))))
