Merge pull request #2830 from penpot/alotor-polishing-10

Small bugfixes

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

@@ -609,6 +609,7 @@
             objects         (wsh/lookup-page-objects state page-id)
             selected-ids    (wsh/lookup-selected state)
             selected-shapes (map (d/getf objects) selected-ids)
+            undo-id (js/Symbol)
 
             move-shape
             (fn [changes shape]
@@ -631,7 +632,10 @@
                                 (pcb/with-objects objects))
                             selected-shapes)]
 
-        (rx/of (dch/commit-changes changes))))))
+        (rx/of (dwu/start-undo-transaction undo-id)
+               (dch/commit-changes changes)
+               (ptk/data-event :layout/update selected-ids)
+               (dwu/commit-undo-transaction undo-id))))))
 
 
 ;; --- Change Shape Order (D&D Ordering)

frontend/src/app/main/fonts.cljs

@@ -283,7 +283,7 @@
       (let [variant (d/seek #(= (:id %) font-variant-id) variants)]
         (-> (generate-gfonts-url
              {:family family
-              :variants [{:id variant}]})
+              :variants [variant]})
             (http/fetch-text)))
 
       (= :custom backend)