Finish with the finalize event translations

Author: WonderlustKing

src/lang/el-GR.edn

@@ -324,14 +324,31 @@
 
  :renderer.tool.impl.element.polyshape
  {:add-points "Κάντε κλικ για να προσθέτε σημεία."
-  :finalize-shape "Διπλό κλικ για να οριστικοποιήσετε το σχήμα."}
+  :finalize-shape "Διπλό κλικ για να οριστικοποιήσετε το σχήμα."
+  :create-tool    "Δημιουργία %1"}
 
  :renderer.tool.impl.element.rect
  {:name "Ορθογώνιο παραλληλόγραμμο"
-  :help [:div "Κρατήστε %1 για να κλειδώσετε τις αναλογίες."]}
+  :help [:div "Κρατήστε %1 για να κλειδώσετε τις αναλογίες."]
+  :create-rectangle "Δημιουργία ορθ. παραλληλόγραμου"}
 
  :renderer.tool.impl.element.svg
- {:help [:div "Κρατήστε %1 για να κλειδώσετε τις αναλογίες."]}
+ {:help [:div "Κρατήστε %1 για να κλειδώσετε τις αναλογίες."]
+  :create-svg "Δημιουργία svg"}
+
+ :renderer.tool.impl.extension.blob
+ {:create-blob "Δημιουργία blob"}
+
+ :renderer.tool.impl.misc.dropper
+ {:help "Κάντε κλικ οπουδήποτε για να επιλέξετε χρώμα."
+  :pick-color "Επιλογή χρώματος"}
+
+ :renderer.tool.impl.misc.fill
+ {:help "Κάντε κλικ σε ένα στοιχείο για γέμισμα."
+  :fill "Γέμισμα"}
+
+ :renderer.tool.impl.misc.measure
+ {:help "Κάντε κλικ και σύρετε για να μετρήσετε μια απόσταση."}
 
  :renderer.attribute.impl.stroke-linecap
  {:description "Η ιδιότητα stroke-linecap είναι μια ιδιότητα παρουσίασης που καθορίζει το σχήμα που θα χρησιμοποιηθεί στο τέλος των ανοιχτών υποδιαδρομών
@@ -426,6 +443,24 @@
  {:zoom-in  [:div "Κάντε κλικ ή επιλέξτε μια περιοχή για μεγέθυνση."]
   :zoom-out [:div "Κρατήστε %1 για σμίκρυνση."]}
 
+ :renderer.tool.impl.draw.brush
+ {:draw-brush "Πινέλο σχεδίασης"}
+
+ :renderer.tool.impl.draw.pen
+ {:draw-line "Σχεδίαση γραμμής"}
+
+ :renderer.tool.impl.draw.core
+ {:help "Κάντε κλικ και σύρετε για να σχεδιάσετε."}
+
+ :renderer.tool.impl.element.circle
+ {:create-circle "Δημιουργία κύκλου"}
+
+ :renderer.tool.impl.element.ellipse
+ {:create-ellipse "Δημιουργία έλλειψης"}
+
+ :renderer.tool.impl.element.line
+ {:create-line "Δημιουργία γραμμής"}
+
  :renderer.document.events
  {:save-changes "Θέλετε να αποθηκεύσετε τις αλλαγές σας?"
   :create-doc   "Δημιουργία εγγράφου"
@@ -528,6 +563,9 @@
   :bounds-center   "κέντρο ορίων"
   :bounds-midpoint "μέσο σημείο ορίων"}
 
+ :renderer.history.events
+ {:clear-history "Εκκαθάριση ιστορικού"}
+
  :renderer.history.views
  {:center-view               "Κεντρική προβολή"
   :clear-history             "Εκκαθάριση ιστορικού"

src/lang/en-US.edn

@@ -354,14 +354,31 @@
 
  :renderer.tool.impl.element.polyshape
  {:add-points "Click to add more points."
-  :finalize-shape "Double click to finalize the shape."}
+  :finalize-shape "Double click to finalize the shape."
+  :create-tool    "Create %1"}
 
  :renderer.tool.impl.element.rect
  {:name "Rectangle"
-  :help [:div "Hold %1 to lock proportions."]}
+  :help [:div "Hold %1 to lock proportions."]
+  :create-rectangle "Create rectangle"}
 
  :renderer.tool.impl.element.svg
- {:help [:div "Hold %1 to lock proportions."]}
+ {:help [:div "Hold %1 to lock proportions."]
+  :create-svg "Create svg"}
+
+ :renderer.tool.impl.extension.blob
+ {:create-blob "Create blob"}
+
+ :renderer.tool.impl.misc.dropper
+ {:help "Click anywhere to pick a color."
+  :pick-color "Pick color"}
+
+ :renderer.tool.impl.misc.fill
+ {:help "Click on an element to fill."
+  :fill "Fill"}
+
+ :renderer.tool.impl.misc.measure
+ {:help "Click and drag to measure a distance."}
 
  :renderer.tool.impl.element.text
  {:help "Click to start typing."}
@@ -457,6 +474,24 @@
  {:zoom-in  [:div "Click or select an area to zoom in."]
   :zoom-out [:div "Hold %1 to zoom out."]}
 
+ :renderer.tool.impl.draw.brush
+ {:draw-brush "Draw brush"}
+
+ :renderer.tool.impl.draw.pen
+ {:draw-line "Draw line"}
+
+ :renderer.tool.impl.draw.core
+ {:help "Click and drag to draw."}
+
+ :renderer.tool.impl.element.circle
+ {:create-circle "Create circle"}
+
+ :renderer.tool.impl.element.ellipse
+ {:create-ellipse "Create ellipse"}
+
+ :renderer.tool.impl.element.line
+ {:create-line "Create line"}
+
  :renderer.document.events
  {:save-changes "Do you want to save your changes?"
   :create-doc   "Create document"
@@ -559,6 +594,9 @@
   :bounds-center   "bounds center"
   :bounds-midpoint "bounds midpoint"}
 
+ :renderer.history.events
+ {:clear-history "Clear history"}
+
  :renderer.history.views
  {:center-view               "Center view"
   :clear-history             "Clear history"

src/renderer/history/events.cljs

@@ -2,7 +2,8 @@
   (:require
    [re-frame.core :as rf]
    [renderer.app.effects :as app.effects]
-   [renderer.history.handlers :as history.handlers]))
+   [renderer.history.handlers :as history.handlers]
+   [renderer.utils.i18n :refer [t]]))
 
 (rf/reg-event-db
  ::undo
@@ -45,7 +46,7 @@
  ::clear
  (fn [db _]
    (-> (history.handlers/clear db)
-       (history.handlers/finalize "Clear history"))))
+       (history.handlers/finalize #(t [::clear-history "Clear history"])))))
 
 (rf/reg-event-db
  ::tree-view-updated

src/renderer/tool/impl/draw/brush.cljs

@@ -11,7 +11,8 @@
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
    [renderer.tool.hierarchy :as tool.hierarchy]
-   [renderer.tool.subs :as-alias tool.subs]))
+   [renderer.tool.subs :as-alias tool.subs]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :brush ::tool.hierarchy/draw)
 
@@ -66,7 +67,7 @@
 (defmethod tool.hierarchy/on-drag-end :brush
   [db _e]
   (-> db
-      (history.handlers/finalize "Draw brush")
+      (history.handlers/finalize #(t [::draw-brush "Draw brush"]))
       (tool.handlers/activate :transform)))
 
 (defmethod tool.hierarchy/render :brush

src/renderer/tool/impl/draw/core.cljs

@@ -3,13 +3,14 @@
    [renderer.tool.handlers :as tool.handlers]
    [renderer.tool.hierarchy :as tool.hierarchy]
    [renderer.tool.impl.draw.brush]
-   [renderer.tool.impl.draw.pen]))
+   [renderer.tool.impl.draw.pen]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive ::tool.hierarchy/draw ::tool.hierarchy/tool)
 
 (defmethod tool.hierarchy/help [::tool.hierarchy/draw :idle]
   []
-  "Click and drag to draw.")
+  (t [::help "Click and drag to draw."]))
 
 (defmethod tool.hierarchy/on-activate ::tool.hierarchy/draw
   [db]

src/renderer/tool/impl/draw/pen.cljs

@@ -9,6 +9,7 @@
    [renderer.tool.handlers :as tool.handlers]
    [renderer.tool.hierarchy :as tool.hierarchy]
    [renderer.utils.element :as utils.element]
+   [renderer.utils.i18n :refer [t]]
    [renderer.utils.path :as utils.path]))
 
 (derive :pen ::tool.hierarchy/draw)
@@ -46,5 +47,5 @@
                  (update-in [:attrs :d] utils.path/manipulate :simplify))]
     (-> db
         (element.handlers/swap path)
-        (history.handlers/finalize "Draw line")
+        (history.handlers/finalize #(t [::draw-line "Draw line"]))
         (tool.handlers/activate :transform))))

src/renderer/tool/impl/element/circle.cljs

@@ -6,7 +6,8 @@
    [renderer.element.handlers :as element.handlers]
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :circle ::tool.hierarchy/element)
 
@@ -42,7 +43,7 @@
 (defmethod tool.hierarchy/on-drag-end :circle
   [db _e]
   (-> db
-      (history.handlers/finalize "Create circle")
+      (history.handlers/finalize #(t [::create-circle "Create circle"]))
       (tool.handlers/activate :transform)))
 
 (defmethod tool.hierarchy/snapping-points :circle

src/renderer/tool/impl/element/ellipse.cljs

@@ -5,7 +5,8 @@
    [renderer.element.handlers :as element.handlers]
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :ellipse ::tool.hierarchy/element)
 
@@ -54,5 +55,5 @@
 (defmethod tool.hierarchy/on-drag-end :ellipse
   [db _e]
   (-> db
-      (history.handlers/finalize "Create ellipse")
+      (history.handlers/finalize #(t [::create-ellipse "Create ellipse"]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/element/line.cljs

@@ -7,7 +7,8 @@
    [renderer.element.hierarchy :as element.hierarchy]
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :line ::tool.hierarchy/element)
 
@@ -46,5 +47,5 @@
 (defmethod tool.hierarchy/on-drag-end :line
   [db _e]
   (-> db
-      (history.handlers/finalize "Create line")
+      (history.handlers/finalize #(t [::create-line "Create line"]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/element/polyshape.cljs

@@ -80,5 +80,5 @@
 (defmethod tool.hierarchy/on-double-click ::tool.hierarchy/polyshape
   [db _e]
   (-> (drop-last-point db)
-      (history.handlers/finalize (str "Create " (name (:tool db))))
+      (history.handlers/finalize #(t [::create-tool "Create %1"] [(name (:tool db))]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/element/rect.cljs

@@ -18,7 +18,7 @@
 
 (defmethod tool.hierarchy/help [:rect :create]
   []
-  (t [::help [:div "Hold %1 to lock proportions."]] 
+  (t [::help [:div "Hold %1 to lock proportions."]]
      [[:span.shortcut-key "Ctrl"]]))
 
 (defn attributes
@@ -58,5 +58,5 @@
 (defmethod tool.hierarchy/on-drag-end :rect
   [db _e]
   (-> db
-      (history.handlers/finalize "Create rectangle")
+      (history.handlers/finalize #(t [::create-rectangle "Create rectangle"]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/element/svg.cljs

@@ -48,5 +48,5 @@
 (defmethod tool.hierarchy/on-drag-end :svg
   [db _e]
   (-> db
-      (history.handlers/finalize "Create SVG")
+      (history.handlers/finalize #(t [::create-svg "Create SVG"]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/extension/blob.cljs

@@ -7,7 +7,8 @@
    [renderer.element.hierarchy :as element.hierarchy]
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :blob ::tool.hierarchy/element)
 
@@ -60,5 +61,5 @@
 (defmethod tool.hierarchy/on-drag-end :blob
   [db _e]
   (-> db
-      (history.handlers/finalize "Create blob")
+      (history.handlers/finalize #(t [::create-blob "Create blob"]))
       (tool.handlers/activate :transform)))

src/renderer/tool/impl/misc/dropper.cljs

@@ -8,7 +8,8 @@
    [renderer.notification.handlers :as notification.handlers]
    [renderer.notification.views :as notification.views]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :dropper ::tool.hierarchy/tool)
 
@@ -18,7 +19,7 @@
 
 (defmethod tool.hierarchy/help [:dropper :idle]
   []
-  "Click anywhere to pick a color.")
+  (t [::help "Click anywhere to pick a color."]))
 
 (defmethod tool.hierarchy/on-activate :dropper
   [db]
@@ -39,7 +40,7 @@
      (-> db
          (document.handlers/assoc-attr :fill srgb-color)
          (element.handlers/assoc-attr :fill srgb-color)
-         (history.handlers/finalize "Pick color")
+         (history.handlers/finalize #(t [::pick-color "Pick color"]))
          (tool.handlers/activate :transform)))))
 
 (rf/reg-event-db

src/renderer/tool/impl/misc/fill.cljs

@@ -4,7 +4,8 @@
    [renderer.element.handlers :as element.handlers]
    [renderer.history.handlers :as history.handlers]
    [renderer.tool.handlers :as tool.handlers]
-   [renderer.tool.hierarchy :as tool.hierarchy]))
+   [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]))
 
 (derive :fill ::tool.hierarchy/tool)
 
@@ -14,7 +15,7 @@
 
 (defmethod tool.hierarchy/help [:fill :idle]
   []
-  "Click on an element to fill.")
+  (t [::help "Click on an element to fill."]))
 
 (defmethod tool.hierarchy/on-activate :fill
   [db]
@@ -25,4 +26,4 @@
   (let [color (document.handlers/attr db :fill)
         el-id (-> e :element :id)]
     (-> (element.handlers/set-attr db el-id :fill color)
-        (history.handlers/finalize "Fill"))))
+        (history.handlers/finalize #(t [::fill "Fill"])))))

src/renderer/tool/impl/misc/measure.cljs

@@ -7,6 +7,7 @@
    [renderer.element.handlers :as element.handlers]
    [renderer.tool.handlers :as tool.handlers]
    [renderer.tool.hierarchy :as tool.hierarchy]
+   [renderer.utils.i18n :refer [t]]
    [renderer.utils.length :as utils.length]
    [renderer.utils.math :as utils.math]
    [renderer.utils.svg :as utils.svg]))
@@ -26,7 +27,7 @@
 
 (defmethod tool.hierarchy/help [:measure :idle]
   []
-  "Click and drag to measure a distance.")
+  (t [::help "Click and drag to measure a distance."]))
 
 (defmethod tool.hierarchy/on-activate :measure
   [db]