                (text-control profile_data state owner :flat_length_sheltered_wall "Length of Sheltered Wall (m)")
                (text-control profile_data state owner :flat_floor_heat_loss_type "Floor Heat Loss Type")])]))]))))
 
-(defn firepalces-row [profiles owner]
+(defn fireplaces-row [profiles owner]
   (reify
     om/IRenderState
     (render-state [_ state]

              [:div
               (text-control profile_data state owner :open_fireplaces "Number of Open Fireplaces")
               (text-control profile_data state owner :sealed_fireplaces "Number of Sealed Fireplaces")])]))]))))


(defn profile-rows [profiles owner]

         (om/build energy-row profiles)
         (om/build efficiency-row profiles)
         (om/build flats-row profiles)
         (om/build fireplaces-row profiles)
         (om/build glazing-row profiles)
         ;; (om/build issues profiles)
         ;; (om/build sap-results profiles)
         ;; (om/build documents profiles)
