3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-03 16:11:40 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix Update main component thumbnail

Browse source
This commit is contained in:
Aitor 2023-12-13 14:08:54 +01:00 • committed by Alonso Torres
parent 88c7ac379b
commit 4fc892a856
6 changed files with 72 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

13
common/src/app/common/thumbnails.cljc
View file

@ -1,7 +1,18 @@
(ns app.common.thumbnails
(:require [cuerdas.core :as str]))
(:require
[app.common.uuid :as uuid]
[cuerdas.core :as str]))
(defn fmt-object-id
"Returns ids formatted as a string (object-id)"
[file-id page-id frame-id tag]
(str/ffmt "%/%/%/%" file-id page-id frame-id tag))
(defn file-id?
"Returns ids formatted as a string (file-id)"
[object-id file-id]
(str/starts-with? object-id (str/concat file-id "/")))
(defn get-file-id
[object-id]
(uuid/uuid (str/slice object-id 0 (str/index-of object-id "/"))))