github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-22 20:06:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix disconnection of lib (#11742)

Browse Source
This commit is contained in:
Eva Marco 2026-09-21 12:51:08 +02:00 committed by GitHub
parent b32a73519e
commit 56bf0e3ebb
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 18 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
frontend/src/app/main/ui/dashboard/import.cljs
View File

@ -389,16 +389,17 @@
(mf/defc library-resolution*
{::mf/private true}
[{:keys [unresolved-file selection on-select]}]
[{:keys [unresolved-file selection on-select on-disconnect]}]
(let [candidates (:pending unresolved-file)
disconnected* (mf/use-state #{})
disconnected (deref disconnected*)
on-change-disconnected
(mf/use-fn
(mf/deps selection candidates on-select on-disconnect)
(fn [id]
(swap! disconnected*
(fn [s]
(if (contains? s id) (disj s id) (conj s id))))))]
(if (contains? selection id)
(on-disconnect id)
(let [{:keys [candidates]} (d/seek #(= id (:id %)) candidates)]
(when-let [first-c (first candidates)]
(on-select id (str (:id first-c))))))))]
;; Pre-select first candidate for each library
(mf/with-effect [candidates]
@ -435,7 +436,7 @@
:label (str (:name c) " (" (:project-name c) ")")})
candidates)
selected (get selection id)
is-conected (not (contains? disconnected id))]
is-conected (contains? selection id)]
[:tr {:class (stl/css :library-resolution-item)
:key (dm/str id)}
[:td {:class (stl/css :library-resolution-item-name)}
@ -645,7 +646,7 @@
(mf/defc import-library-resolution-stage*
{::mf/private true}
[{:keys [current-unresolved-file selection on-select
[{:keys [current-unresolved-file selection on-select on-disconnect
visited all-visited?
on-wizard-prev on-wizard-next on-wizard-skip]}]
[:*
@ -653,7 +654,8 @@
[:> library-resolution*
{:unresolved-file current-unresolved-file
:selection selection
:on-select on-select}]]
:on-select on-select
:on-disconnect on-disconnect}]]
[:div {:class (stl/css :modal-footer)}
[:div {:class (stl/css :action-buttons)}
@ -913,7 +915,12 @@
(mf/use-fn
(mf/deps selection)
(fn [old-lib-id candidate-id]
(swap! selection* assoc old-lib-id candidate-id)))]
(swap! selection* assoc old-lib-id candidate-id)))
manage-on-disconnect
(mf/use-fn
(fn [old-lib-id]
(swap! selection* dissoc old-lib-id)))]
(mf/with-effect [visited unresolved-files]
(when (and (seq unresolved-files)
@ -982,6 +989,7 @@
{:current-unresolved-file current-unresolved-file
:selection selection
:on-select manage-on-select
:on-disconnect manage-on-disconnect
:visited visited
:all-visited? all-visited?
:on-wizard-prev on-wizard-prev