content lengths specified.

2022-07-12 06:34:52 -07:00
parent bb6592bd71
commit ab51d77384
7 changed files with 25 additions and 17 deletions
--- a/src/clj/auto_ap/background/mail.clj
+++ b/src/clj/auto_ap/background/mail.clj
@@ -62,7 +62,8 @@
                    _           (s3/put-object :bucket-name (:data-bucket env)
                                               :key s3-location
                                               :input-stream (io/input-stream filename)
-                                               :metadata {:content-type "application/pdf"})
+                                               :metadata {:content-type "application/pdf"
+                                                          :content-length (.length (io/file filename))})
                    imports     (->> (parse/parse-file filename filename)
                                     (map #(assoc %
                                                  :source-url (str "http://" (:data-bucket env)