Skip to content

Commit

Permalink
AE-2247: Remove unsued parameter from viesti_liite generation in tests
Browse files Browse the repository at this point in the history
  • Loading branch information
solita-juhohaa committed Oct 16, 2024
1 parent 1f401d0 commit ccbbe8e
Show file tree
Hide file tree
Showing 2 changed files with 10 additions and 16 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -500,23 +500,17 @@
:vastaanottajaryhma-id nil
:energiatodistus-id energiatodistus-id-2}))
_ (liite-test-data/generate-and-insert-files-to-viestiketju! 2
laatija-id

viestiketju-1-id)
file-liitteet-1 (mapv :id (viesti-service/find-liitteet ts/*db*
(test-whoami/paakayttaja paakayttaja-id)
viestiketju-1-id))
link-liitteet-1 (liite-test-data/generate-and-insert-links-to-viestiketju! 2
laatija-id
viestiketju-1-id)
_ (liite-test-data/generate-and-insert-files-to-viestiketju! 2
laatija-id
viestiketju-2-id)
link-liitteet-1 (liite-test-data/generate-and-insert-links-to-viestiketju! 2 viestiketju-1-id)
_ (liite-test-data/generate-and-insert-files-to-viestiketju! 2 viestiketju-2-id)
file-liitteet-2 (mapv :id (viesti-service/find-liitteet ts/*db*
(test-whoami/paakayttaja paakayttaja-id)
viestiketju-2-id))
link-liitteet-2 (liite-test-data/generate-and-insert-links-to-viestiketju! 2
laatija-id
viestiketju-2-id)
link-liitteet-2 (liite-test-data/generate-and-insert-links-to-viestiketju! 2 viestiketju-2-id)
file-liitteet-keys-1 (->> file-liitteet-1
(map #(viesti-service/file-path viestiketju-1-id %)))
link-liitteet-keys-1 (->> link-liitteet-1
Expand Down
12 changes: 6 additions & 6 deletions etp-core/etp-backend/src/test/clj/solita/etp/test_data/liite.clj
Original file line number Diff line number Diff line change
Expand Up @@ -44,22 +44,22 @@
(let [link-adds (generate-link-adds n)]
(zipmap (insert-links! link-adds laatija-id energiatodistus-id) link-adds)))

(defn insert-files-to-viestiketju! [file-adds laatija-id viestiketju-id]
(defn insert-files-to-viestiketju! [file-adds viestiketju-id]
(viesti-service/add-liitteet-from-files! ts/*db*
ts/*aws-s3-client*
viestiketju-id
file-adds))

(defn insert-links-to-viestiketju! [link-adds laatija-id viestiketju-id]
(defn insert-links-to-viestiketju! [link-adds viestiketju-id]
(mapv #(viesti-service/add-liite-from-link! ts/*db*
viestiketju-id
%)
link-adds))

(defn generate-and-insert-files-to-viestiketju! [n laatija-id viestiketju-id]
(defn generate-and-insert-files-to-viestiketju! [n viestiketju-id]
(let [file-adds (generate-file-adds n)]
(zipmap (insert-files-to-viestiketju! file-adds laatija-id viestiketju-id) file-adds)))
(zipmap (insert-files-to-viestiketju! file-adds viestiketju-id) file-adds)))

(defn generate-and-insert-links-to-viestiketju! [n laatija-id viestiketju-id]
(defn generate-and-insert-links-to-viestiketju! [n viestiketju-id]
(let [link-adds (generate-link-adds n)]
(zipmap (insert-links-to-viestiketju! link-adds laatija-id viestiketju-id) link-adds)))
(zipmap (insert-links-to-viestiketju! link-adds viestiketju-id) link-adds)))

0 comments on commit ccbbe8e

Please sign in to comment.