       #_#_fg-data          (.-data fg-image-data)
       #_#_bg-data          (.-data bg-image-data)
       ;; Update glyph texture in memory
+      (.clear glyph-image-data)
+      (.clear fg-image-data)
+      (.clear bg-image-data)
       (doseq [row (range rows)
               col (range columns)]
         (let [c         (get-in @character-map [row col])

                                            0.0, vy  0.0
                                            vx   0.0 0.0
                                            0.0  0.0 0.0,])
        texture-coords        (float-array [0.0 1.0
                                            0.0 1.0
                                            1.0 0.0
                                            0.0 0.0])

                       character-map
                       cursor-xy
                       {:p-matrix-buffer (ortho-matrix-buffer screen-width screen-height)
                        :mv-matrix-buffer (position-matrix-buffer [(- (/ screen-width 2)) (- (/ screen-height 2)) -1.0 0.0])
                        :buffers {:vao-id vao-id
                                  :vertices-vbo-id vertices-vbo-id
                                  :vertices-count vertices-count
