0
Fork 0
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:
Andrey Antukh 2025-01-29 18:48:18 +01:00
parent 930ad359dd
commit 889902080b
5 changed files with 12 additions and 5 deletions

View file

@ -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}

View file

@ -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])

View file

@ -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)

View file

@ -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

View file

@ -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))]