mirror of
https://github.com/penpot/penpot.git
synced 2025-02-23 23:35:58 -05:00
📎 Fix linter issues
Related to the upcoming update of clj-kondo
This commit is contained in:
parent
930ad359dd
commit
889902080b
5 changed files with 12 additions and 5 deletions
|
@ -58,6 +58,12 @@
|
||||||
:redundant-do
|
:redundant-do
|
||||||
{:level :off}
|
{:level :off}
|
||||||
|
|
||||||
|
:redundant-ignore
|
||||||
|
{:level :off}
|
||||||
|
|
||||||
|
:redundant-nested-call
|
||||||
|
{:level :off}
|
||||||
|
|
||||||
:earmuffed-var-not-dynamic
|
:earmuffed-var-not-dynamic
|
||||||
{:level :off}
|
{:level :off}
|
||||||
|
|
||||||
|
|
|
@ -4,7 +4,6 @@
|
||||||
;;
|
;;
|
||||||
;; Copyright (c) KALEIDOS INC
|
;; Copyright (c) KALEIDOS INC
|
||||||
|
|
||||||
#_:clj-kondo/ignore
|
|
||||||
(ns app.common.data.macros
|
(ns app.common.data.macros
|
||||||
"Data retrieval & manipulation specific macros."
|
"Data retrieval & manipulation specific macros."
|
||||||
(:refer-clojure :exclude [get-in select-keys str with-open min max])
|
(:refer-clojure :exclude [get-in select-keys str with-open min max])
|
||||||
|
|
|
@ -496,7 +496,7 @@
|
||||||
(let [repair-shape
|
(let [repair-shape
|
||||||
(fn [shape]
|
(fn [shape]
|
||||||
;; Remove the swap slot
|
;; Remove the swap slot
|
||||||
(log/debug :hint (str " -> remove swap-slot"))
|
(log/debug :hint " -> remove swap-slot")
|
||||||
(ctk/remove-swap-slot shape))]
|
(ctk/remove-swap-slot shape))]
|
||||||
|
|
||||||
(log/dbg :hint "repairing shape :misplaced-slot" :id (:id shape) :name (:name shape) :page-id page-id)
|
(log/dbg :hint "repairing shape :misplaced-slot" :id (:id shape) :name (:name shape) :page-id page-id)
|
||||||
|
|
|
@ -174,8 +174,10 @@
|
||||||
bounds
|
bounds
|
||||||
(cond
|
(cond
|
||||||
(or (empty? (:shapes shape))
|
(or (empty? (:shapes shape))
|
||||||
(or (:masked-group shape) (= :bool (:type shape)))
|
(:masked-group shape)
|
||||||
(and (cfh/frame-shape? shape) (not (:show-content shape))))
|
(cfh/bool-shape? shape)
|
||||||
|
(and (cfh/frame-shape? shape)
|
||||||
|
(not (:show-content shape))))
|
||||||
[base-bounds]
|
[base-bounds]
|
||||||
|
|
||||||
:else
|
:else
|
||||||
|
|
|
@ -72,7 +72,7 @@
|
||||||
([context type id media]
|
([context type id media]
|
||||||
(let [file-id (:file-id context)
|
(let [file-id (:file-id context)
|
||||||
path (case type
|
path (case type
|
||||||
:manifest (str "manifest.json")
|
:manifest "manifest.json"
|
||||||
:page (str file-id "/" id ".svg")
|
:page (str file-id "/" id ".svg")
|
||||||
:colors-list (str file-id "/colors.json")
|
:colors-list (str file-id "/colors.json")
|
||||||
:colors (let [ext (cm/mtype->extension (:mtype media))]
|
:colors (let [ext (cm/mtype->extension (:mtype media))]
|
||||||
|
|
Loading…
Add table
Reference in a new issue