From 1de1eb6b9b9209112078cc5aaf9741a7040d2381 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andr=C3=A9s=20Moya?= <andres.moya@kaleidos.net>
Date: Fri, 13 Aug 2021 13:42:33 +0200
Subject: [PATCH] :bug: Fix initial shape names

---
 common/src/app/common/pages/init.cljc     | 12 ++++++------
 frontend/src/app/main/data/workspace.cljs |  2 +-
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/common/src/app/common/pages/init.cljc b/common/src/app/common/pages/init.cljc
index ca42025f4..a37584c23 100644
--- a/common/src/app/common/pages/init.cljc
+++ b/common/src/app/common/pages/init.cljc
@@ -15,7 +15,7 @@
 
 (def empty-page-data
   {:options {}
-   :name "Page"
+   :name "Page-1"
    :objects
    {root
     {:id root
@@ -38,7 +38,7 @@
 
 (def ^:private minimal-shapes
   [{:type :rect
-    :name "Rect"
+    :name "Rect-1"
     :fill-color default-color
     :fill-opacity 1
     :stroke-style :none
@@ -52,7 +52,7 @@
    {:type :image}
 
    {:type :circle
-    :name "Circle"
+    :name "Circle-1"
     :fill-color default-color
     :fill-opacity 1
     :stroke-style :none
@@ -62,7 +62,7 @@
     :stroke-opacity 0}
 
    {:type :path
-    :name "Path"
+    :name "Path-1"
     :stroke-style :solid
     :stroke-alignment :center
     :stroke-width 2
@@ -70,7 +70,7 @@
     :stroke-opacity 1}
 
    {:type :frame
-    :name "Artboard"
+    :name "Artboard-1"
     :fill-color "#ffffff"
     :fill-opacity 1
     :stroke-style :none
@@ -80,7 +80,7 @@
     :stroke-opacity 0}
 
    {:type :text
-    :name "Text"
+    :name "Text-1"
     :content nil}
 
    {:type :svg-raw}])
diff --git a/frontend/src/app/main/data/workspace.cljs b/frontend/src/app/main/data/workspace.cljs
index 7a36d2009..66a8aa5b3 100644
--- a/frontend/src/app/main/data/workspace.cljs
+++ b/frontend/src/app/main/data/workspace.cljs
@@ -274,7 +274,7 @@
       (watch [it state _]
         (let [pages   (get-in state [:workspace-data :pages-index])
               unames  (dwc/retrieve-used-names pages)
-              name    (dwc/generate-unique-name unames "Page")
+              name    (dwc/generate-unique-name unames "Page-1")
 
               rchange {:type :add-page
                        :id id