 (def title-2 "Focus Example - 2 - ")
 
 (fg/defevolverfn window-text-evolver-2 :text
-                 (let [focus-state (get-property [:this] :focus-state)]
-                   (str title-1 (:mode focus-state) "/" (:focused-child focus-state))))
+  (let [focus-state (get-property [:this] :focus-state)]
+    (str title-2 (:mode focus-state) "/" (:focused-child focus-state))))
 
 (def focus-window
   (fg/defcomponent

    (fg/defcomponent textfield/textfield :entry1
      {:clip-size (m/defpoint 3.0 0.375)
       :position-matrix (m/translation 0.25 0.75)
       :evolvers {:model tf-model-evolver}
       })

    (fg/defcomponent textfield/textfield :entry2
      {:clip-size (m/defpoint 3.0 0.375)

       :position-matrix (m/translation 0.25 1.75)
       :evolvers {:model tf-model-evolver}})

    (fg/defcomponent panel/panel :panel1
      {:clip-size (m/defpoint 3.0 3.0)
       :position-matrix (m/translation 0.25 2.5)
       :look container-look})

    (fg/defcomponent panel/panel :panel2
      {:clip-size (m/defpoint 3.0 3.0)
       :position-matrix (m/translation 3.5 2.5)
       :look container-look}

         (fg/defcomponent panel/panel :panel2-1
           {:clip-size (m/defpoint 2.75 1.0)
            :position-matrix (m/translation 0.125 0.5)
            :look container-look}

           (fg/defcomponent textfield/textfield :entry1
             {:clip-size (m/defpoint 1.125 0.375)
              :position-matrix (m/translation 0.125 0.5)
              :evolvers {:model tf-model-evolver}})

           (fg/defcomponent textfield/textfield :entry2
             {:clip-size (m/defpoint 1.125 0.375)
              :position-matrix (m/translation 1.5 0.5)
              :evolvers {:model tf-model-evolver}}))

         (fg/defcomponent panel/panel :panel2-2
           {:clip-size (m/defpoint 2.75 1.0)
            :position-matrix (m/translation 0.125 1.625)
            :look container-look}

           (fg/defcomponent textfield/textfield :entry1
             {:clip-size (m/defpoint 1.125 0.375)
              :position-matrix (m/translation 0.125 0.5)
              :evolvers {:model tf-model-evolver}})

           (fg/defcomponent textfield/textfield :entry2
             {:clip-size (m/defpoint 1.125 0.375)
              :position-matrix (m/translation 1.5 0.5)
              :evolvers {:model tf-model-evolver}})))))

(def focus-window-2
  (fg/defcomponent
