remove the fbo code, use the gadget title

extra/cap/cap.factor

@@ -8,7 +8,7 @@ IN: cap
 
 : gl-screenshot ( gadget -- byte-array )
     [
-        GL_COLOR_ATTACHMENT0_EXT glReadBuffer
+        GL_BACK glReadBuffer
         GL_PACK_ALIGNMENT 1 glPixelStorei
         0 0
     ] dip
@@ -21,33 +21,11 @@ IN: cap
     [ dim>> first2 ] bi
     bgr>bitmap ;
 
-: gadget-world ( gadget -- world )
-    "fake" f <model> <world> ;
-
-: draw-world-to-fbo ( world fbo -- )
-    [ relayout-1 ] with-framebuffer ;
-
-: <fbo> ( w h -- fbo )
-    GL_DEPTH_TEST glDisable
-    gen-framebuffer [ '[
-        gen-renderbuffer
-        GL_RENDERBUFFER_EXT over glBindRenderbufferEXT
-        GL_RENDERBUFFER_EXT GL_RGB _ _ glRenderbufferStorageEXT
-        GL_FRAMEBUFFER_EXT
-        GL_COLOR_ATTACHMENT0_EXT
-        GL_RENDERBUFFER_EXT roll glFramebufferRenderbufferEXT
-        check-framebuffer
-    ] with-framebuffer ] keep ;
-
-: draw-gadget-to-bgr ( gadget -- byte-array )
-    [ [ prefer ] [ gadget-world ] bi ] [ dim>> first2 <fbo> ] bi
-    [ gl-screenshot ] with-framebuffer ;
-
 : save-screenshot ( window path -- )
     [ screenshot ] dip save-bitmap ;
 
 : screenshot. ( window -- )
-    screenshot <graphics-gadget> "Screenshot" open-window ;
+    [ screenshot <graphics-gadget> ] [ title>> ] bi open-window ;