mirror of
https://github.com/penpot/penpot.git
synced 2026-08-11 15:29:06 +00:00
f993f203bd
* ✨ Adds static dispatch safe stubs in tests * 🐛 Fix shapesColors metadata key to match ColorShapeInfo * 🐛 Fix CommentThread.remove rejecting the owner's own threads * 🐛 Fix page.removeCommentThread throwing on a spurious Promise * ✨ Implement ShapeBase.swapComponent in the plugin API * ✨ Expose File.revn in the plugin API * 🐛 Fix FileVersion.createdAt calling Luxon method on a js/Date * 🐛 Fix plugin font/typography application to text and ranges * 🐛 Default plugin overlay interaction position for non-manual types * 🐛 Fix plugin interaction setters passing an id-only shape * 🐛 Fix grid addColumnAtIndex rejecting valid track types * 🐛 Expose libraryId on library color/typography/component proxies * ✨ Implement LibraryTypography.setFont in the plugin API * 🐛 Fix typography.applyToTextRange reading unexposed range bounds * 🐛 Fix utils.geometry.center argument mismatch * 🐛 Fix localStorage.removeItem calling getItem * 🐛 Fix shape backgroundBlur proxy key casing * 🐛 Report boolean shape type as 'boolean' in the plugin API * 🐛 Return the resulting paths from plugin flatten * 🐛 Make plugin z-order methods act on the target shape * 🐛 Make is-variant-container? return a boolean * ✨ Implement Group.isMask in the plugin API * 🐛 Return a shape proxy from TextRange.shape * 🐛 Return the duplicated set from TokenSet.duplicate * 🐛 Fix theme addSet/removeSet reading set name with a keyword * 🐛 Accept string fontFamilies token value in the plugin API * 🐛 Fix combineAsVariants ignoring the passed component ids * 🐛 Fix board removeRulerGuide ignoring its argument * 🐛 Fix board guides setter schema and parser * 🐛 Avoid 0-byte allocation when syncing empty grid tracks * 🐛 Validate grid track indices in the plugin API * 🐛 Return null for empty input in group() and centerShapes() * 🐛 Return TokenTypographyValue[] from a typography token's resolvedValue * 🐛 Return TokenShadowValue[] from a shadow token's resolvedValue * 🐛 Return string[] from a fontFamilies token's resolvedValue * 🐛 Clear mutually-exclusive reps when setting LibraryColor gradient/image * 🐛 Add readonly tags to types, deprecate Image type * 📚 Update plugins changelog
72 lines
2.2 KiB
Clojure
72 lines
2.2 KiB
Clojure
;; This Source Code Form is subject to the terms of the Mozilla Public
|
|
;; License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
;;
|
|
;; Copyright (c) KALEIDOS INC Sucursal en España SL
|
|
|
|
(ns app.plugins.local-storage
|
|
(:require
|
|
[app.common.data.macros :as dm]
|
|
[app.common.exceptions :as ex]
|
|
[app.plugins.register :as r]
|
|
[app.plugins.utils :as u]
|
|
[app.util.globals :as g]
|
|
[app.util.object :as obj]
|
|
[cuerdas.core :as str]))
|
|
|
|
(defonce ^:private local-storage
|
|
(ex/ignoring (unchecked-get g/global "localStorage")))
|
|
|
|
(defn prefix-key
|
|
[plugin-id key]
|
|
(dm/str "penpot-plugins:" plugin-id "/" key))
|
|
|
|
(defn local-storage-proxy
|
|
[plugin-id]
|
|
(obj/reify {:name "LocalStorageProxy"}
|
|
:$plugin {:enumerable false :get (fn [] plugin-id)}
|
|
|
|
:getItem
|
|
(fn [key]
|
|
(cond
|
|
(not (r/check-permission plugin-id "allow:localstorage"))
|
|
(u/not-valid plugin-id :getItem "Plugin doesn't have 'allow:localstorage' permission")
|
|
|
|
(not (string? key))
|
|
(u/not-valid plugin-id :getItem "The key must be a string")
|
|
|
|
:else
|
|
(.getItem ^js local-storage (prefix-key plugin-id key))))
|
|
|
|
:setItem
|
|
(fn [key value]
|
|
(cond
|
|
(not (r/check-permission plugin-id "allow:localstorage"))
|
|
(u/not-valid plugin-id :setItem "Plugin doesn't have 'allow:localstorage' permission")
|
|
|
|
(not (string? key))
|
|
(u/not-valid plugin-id :setItem "The key must be a string")
|
|
|
|
:else
|
|
(.setItem ^js local-storage (prefix-key plugin-id key) value)))
|
|
|
|
:removeItem
|
|
(fn [key]
|
|
(cond
|
|
(not (r/check-permission plugin-id "allow:localstorage"))
|
|
(u/not-valid plugin-id :removeItem "Plugin doesn't have 'allow:localstorage' permission")
|
|
|
|
(not (string? key))
|
|
(u/not-valid plugin-id :removeItem "The key must be a string")
|
|
|
|
:else
|
|
(.removeItem ^js local-storage (prefix-key plugin-id key))))
|
|
|
|
:getKeys
|
|
(fn []
|
|
(->> (.keys js/Object local-storage)
|
|
(filter #(str/starts-with? % (prefix-key plugin-id "")))
|
|
(map #(str/replace % (prefix-key plugin-id "") ""))
|
|
(apply array)))))
|
|
|