🐛 Fix problems with masks

frontend/src/app/main/data/workspace/persistence.cljs

@@ -50,7 +50,7 @@
   (ptk/reify ::initialize-persistence
     ptk/EffectEvent
     (effect [_ _ stream]
-      (let [stoper   (rx/filter #(= :app.main.data.workspace/finalize %) stream)
+      (let [stoper   (rx/filter #(= ::finalize %) stream)
             forcer   (rx/filter #(= ::force-persist %) stream)
             notifier (->> stream
                           (rx/filter dch/commit-changes?)

frontend/src/app/main/ui/shapes/mask.cljs

@@ -51,21 +51,9 @@
           render-id (mf/use-ctx muc/render-ctx)
           svg-text? (and (= :text (:type mask)) (some? (:position-data mask)))
 
-          mask      (cond-> mask svg-text? set-white-fill)
-
           mask-bb
-          (cond
-            svg-text?
-            (gst/position-data-points mask)
-
-            :else
           (-> (gsh/transform-shape mask)
-                (:points)))]
-      [:*
-       [:g {:opacity 0}
-        [:g {:id (str "shape-" (mask-id render-id mask))}
-         [:& shape-wrapper {:shape (dissoc mask :shadow :blur)}]]]
-
+              (:points))]
       [:defs
        [:filter {:id (filter-id render-id mask)}
         [:feFlood {:flood-color "white"
@@ -83,10 +71,10 @@
                                  (map #(str (:x %) "," (:y %)))
                                  (str/join " "))}]]
 
+       ;; When te shape is a text we pass to the shape the info and disable the filter.
+       ;; There is a bug in Firefox with filters and texts. We change the text to white at shape level
        [:mask {:class "mask-shape"
                :id (mask-id render-id mask)}
-         ;; SVG texts are broken in Firefox with the filter. When the masking shapes is a text
-         ;; we use the `set-white-fill` instead of using the filter
         [:g {:filter (when-not svg-text? (filter-url render-id mask))}
-          [:use {:href (str "#shape-" (mask-id render-id mask))}]]]]])))
+         [:& shape-wrapper {:shape (-> mask (dissoc :shadow :blur) (assoc :is-mask? true))}]]]])))
 

frontend/src/app/main/ui/shapes/text/svg_text.cljs

@@ -19,13 +19,27 @@
 
 (def fill-attrs [:fill-color :fill-color-gradient :fill-opacity])
 
+(defn set-white-fill
+  [shape]
+  (let [update-color
+        (fn [data]
+          (-> data
+              (dissoc :fill-color :fill-opacity :fill-color-gradient)
+              (assoc :fills [{:fill-color "#FFFFFF" :fill-opacity 1}])))]
+    (-> shape
+        (d/update-when :position-data #(mapv update-color %))
+        (assoc :stroke-color "#FFFFFF" :stroke-opacity 1))))
+
 (mf/defc text-shape
   {::mf/wrap-props false
    ::mf/wrap [mf/memo]}
   [props]
 
   (let [render-id (mf/use-ctx muc/render-ctx)
-        {:keys [x y width height position-data] :as shape} (obj/get props "shape")
+        shape (obj/get props "shape")
+        shape (cond-> shape (:is-mask? shape) set-white-fill)
+
+        {:keys [x y width height position-data]} shape
 
         transform (str (gsh/transform-matrix shape))