   (testing "create arc item"
     (let [item (cc/arc-file-item-from-bytes
                 "WAT"
-                (xio/binary-slurp (io/resource "metafilter.arc")))]
+                (xio/binary-slurp (io/resource "metafilter.farc")))]
       (is (= (cc/item-mime-type item) "text/html"))
       (is (= (subs (cc/item-text item) 0 30) "<!DOCTYPE HTML PUBLIC \"-//W3C/")))))
 

            [com.lemonodor.xio :as xio]
            [midje.cascalog :refer :all]
            [midje.sweet :refer :all]))


(defn print-methods [item]
  (pprint/print-table
   (sort-by
    :name
    (filter :exception-types (:members (reflect/reflect item)))))
  true)


(deftest path-tests

      ["<html>\r\n\r\n<head>\r\n<title>"]
      ["<html>\r\n\r\n<head>\r\n<title>"]
      ["<html>\r\n\r\n<head>\r\n<title>"]])))
