    (Mouse/isButtonDown 1) (Mouse/setGrabbed false)
    (Mouse/isButtonDown 2) (println "Mouse button 2 down")))
 
-(defn draw-models []
-  (GL20/glUseProgram @program)
-  (draw-axes)
-  (draw-container-cube)
-  (draw-rectangle)
-  (GL20/glUseProgram 0))
-
 (defn draw-textured-panel []
+  (.bind Color/white)
+  (.bind @texture)
+
   (do-shape GL11/GL_QUADS
             (GL11/glTexCoord2f 1 0)
             (GL11/glVertex3f 1 0 0)

            (GL11/glTexCoord2f 1 1)
            (GL11/glVertex3f 1 1 0)))

(defn draw-textured-model []
  ;; face
  (draw-textured-panel)

  ;; back
  (drawing-object
   (GL11/glTranslatef 0 0 -1)
   (draw-textured-panel))

  ;; ;; left
  (drawing-object
   (GL11/glRotatef 90 0 1 0)
   (draw-textured-panel))

  ;; ;; right
  (drawing-object
   (GL11/glTranslatef 1 0 0)
   (GL11/glRotatef 90 0 1 0)
   (draw-textured-panel))

  ;; back
  (drawing-object
   (GL11/glRotatef -90 1 0 0)
   (draw-textured-panel))

  ;; ;; top
  (drawing-object
   (GL11/glTranslatef 0 1 0)
   (GL11/glRotatef -90 1 0 0)
   (draw-textured-panel)))

(defn draw []
  (GL11/glClear (bit-or GL11/GL_COLOR_BUFFER_BIT GL11/GL_DEPTH_BUFFER_BIT))

  (GL11/glLoadIdentity)
  (.applyTranslations @camera)

  (.bind Color/white)
  (.bind @texture)
  (draw-textured-model)

  (draw-models)
  


(defn draw-rectangle []
  (drawing-object
   (GL11/glColor3f 1 1 1)
   (GL11/glTranslatef 0 -10 0)
   (GL11/glRotatef 90 1 0 0)
   (draw-textured-panel)))

(def AXIS-WIDTH 0.05)

