3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-11 12:26:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

🔥 Remove unused code.

Browse source
This commit is contained in:
Andrey Antukh 2020-12-09 17:26:04 +01:00 • committed by Alonso Torres
parent 05563168c3
commit 6cb2f1663e
2 changed files with 1 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

9
backend/src/app/db.clj
View file

@ -219,15 +219,6 @@
:else :else
(ex/raise :type :not-implemented))) (ex/raise :type :not-implemented)))
(defn decode-pgobject
[^PGobject obj]
(let [typ (.getType obj)
val (.getValue obj)]
(if (or (= typ "json")
(= typ "jsonb"))
(json/read-str val)
val)))
(defn decode-json-pgobject (defn decode-json-pgobject
[^PGobject o] [^PGobject o]
(let [typ (.getType o) (let [typ (.getType o)

2
backend/src/app/tasks/remove_media.clj
View file

@ -76,7 +76,7 @@
[_task] [_task]
(letfn [(decode-row [{:keys [data] :as row}] (letfn [(decode-row [{:keys [data] :as row}]
(cond-> row (cond-> row
(db/pgobject? data) (assoc :data (db/decode-pgobject data)))) (db/pgobject? data) (assoc :data (db/decode-json-pgobject data))))
(retrieve-items [conn] (retrieve-items [conn]
(->> (db/exec! conn [sql:retrieve-peding-to-delete 10]) (->> (db/exec! conn [sql:retrieve-peding-to-delete 10])
(map decode-row) (map decode-row)