Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-09 16:30:37 -05:00
Code Issues Activity

Merge pull request #4835 from penpot/alotor-plugins-3

Browse source 
🐛 Fix some problems in plugins
This commit is contained in:
Andrey Antukh 2024-07-02 15:44:50 +02:00 committed by GitHub
commit f6435461a1
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
2 changed files with 19 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
frontend/src/app/main/ui/workspace/plugins.cljs
View file

@ -209,34 +209,34 @@
[:div {:class (stl/css :permissions-list-entry)}
i/oauth-1
[:p {:class (stl/css :permissions-list-text)}
(tr "workspace.plugins.permissions.disclaimer")]])
(tr "workspace.plugins.permissions.content-read")]])
(when (contains? permissions "content:write")
[:div {:class (stl/css :permissions-list-entry)}
i/oauth-1
[:p {:class (stl/css :permissions-list-text)}
(tr "workspace.plugins.permissions.content-read")]])
(tr "workspace.plugins.permissions.content-write")]])
(when (contains? permissions "user:read")
[:div {:class (stl/css :permissions-list-entry)}
i/oauth-2
[:p {:class (stl/css :permissions-list-text)}
(tr "workspace.plugins.permissions.content-write")]])
(tr "workspace.plugins.permissions.user-read")]])
(when (contains? permissions "library:read")
[:div {:class (stl/css :permissions-list-entry)}
i/oauth-3
[:p {:class (stl/css :permissions-list-text)}
(tr "workspace.plugins.permissions.user-read")]])
(tr "workspace.plugins.permissions.library-read")]])
(when (contains? permissions "library:write")
[:div {:class (stl/css :permissions-list-entry)}
i/oauth-3
[:p {:class (stl/css :permissions-list-text)}
(tr "workspace.plugins.permissions.library-read")]])]
(tr "workspace.plugins.permissions.library-write")]])]
[:div {:class (stl/css :permissions-disclaimer)}
(tr "workspace.plugins.permissions.library-write")]]
(tr "workspace.plugins.permissions.disclaimer")]]
[:div {:class (stl/css :modal-footer)}
[:div {:class (stl/css :action-buttons)}

26
frontend/src/app/plugins/text.cljs
View file

@ -105,7 +105,7 @@
(let [font (when (string? value) (fonts/get-font-data value))
variant (fonts/get-default-variant font)]
(cond
(not (some? font))
(not font)
(u/display-not-valid :fontId value)
(not (r/check-permission plugin-id "content:write"))
@ -121,7 +121,7 @@
:set
(fn [_ value]
(let [font (fonts/find-font-data {:font-family value})
(let [font (fonts/find-font-data {:family value})
variant (fonts/get-default-variant font)]
(cond
(not (string? value))
@ -320,7 +320,7 @@
(st/emit! (dwt/update-text-range id start end {:fills value})))))})))
(defn add-text-props
[plugin-id shape-proxy]
[shape-proxy plugin-id]
(crc/add-properties!
shape-proxy
{:name "characters"
@ -374,7 +374,7 @@
font (when (string? value) (fonts/get-font-data value))
variant (fonts/get-default-variant font)]
(cond
(not (some? font))
(not font)
(u/display-not-valid :fontId value)
(not (r/check-permission plugin-id "content:write"))
@ -388,10 +388,10 @@
:set
(fn [self value]
(let [id (obj/get self "$id")
font (fonts/find-font-data {:font-family value})
font (fonts/find-font-data {:family value})
variant (fonts/get-default-variant font)]
(cond
(not (some? font))
(not font)
(u/display-not-valid :fontFamily value)
(not (r/check-permission plugin-id "content:write"))
@ -408,7 +408,7 @@
font (fonts/get-font-data (obj/get self "fontId"))
variant (fonts/get-variant font value)]
(cond
(not (some? variant))
(not variant)
(u/display-not-valid :fontVariantId value)
(not (r/check-permission plugin-id "content:write"))
@ -490,7 +490,7 @@
(let [id (obj/get self "$id")
value (str/trim (dm/str value))]
(cond
(or (empty? value) (re-matches letter-spacing-re value))
(or (not (string? value)) (not (re-matches letter-spacing-re value)))
(u/display-not-valid :letterSpacing value)
(not (r/check-permission plugin-id "content:write"))
@ -505,7 +505,7 @@
(fn [self value]
(let [id (obj/get self "$id")]
(cond
(and (string? value) (re-matches text-transform-re value))
(or (not (string? value)) (not (re-matches text-transform-re value)))
(u/display-not-valid :textTransform value)
(not (r/check-permission plugin-id "content:write"))
@ -520,7 +520,7 @@
(fn [self value]
(let [id (obj/get self "$id")]
(cond
(and (string? value) (re-matches text-decoration-re value))
(or (not (string? value)) (not (re-matches text-decoration-re value)))
(u/display-not-valid :textDecoration value)
(not (r/check-permission plugin-id "content:write"))
@ -535,7 +535,7 @@
(fn [self value]
(let [id (obj/get self "$id")]
(cond
(and (string? value) (re-matches text-direction-re value))
(or (not (string? value)) (not (re-matches text-direction-re value)))
(u/display-not-valid :textDirection value)
(not (r/check-permission plugin-id "content:write"))
@ -550,7 +550,7 @@
(fn [self value]
(let [id (obj/get self "$id")]
(cond
(and (string? value) (re-matches text-align-re value))
(or (not (string? value)) (not (re-matches text-align-re value)))
(u/display-not-valid :align value)
(not (r/check-permission plugin-id "content:write"))
@ -565,7 +565,7 @@
(fn [self value]
(let [id (obj/get self "$id")]
(cond
(and (string? value) (re-matches vertical-align-re value))
(or (not (string? value)) (not (re-matches vertical-align-re value)))
(u/display-not-valid :verticalAlign value)
(not (r/check-permission plugin-id "content:write"))