diff --git a/extra/ui/gadgets/slate/slate.factor b/extra/ui/gadgets/slate/slate.factor
index 08e8b2765c..0505586b53 100644
--- a/extra/ui/gadgets/slate/slate.factor
+++ b/extra/ui/gadgets/slate/slate.factor
@@ -96,18 +96,21 @@ M: slate draw-gadget* ( slate -- )
 
    establish-coordinate-system
 
-   GL_MODELVIEW glMatrixMode glLoadIdentity glPushMatrix
+   GL_MODELVIEW glMatrixMode glPushMatrix glLoadIdentity 
 
    setup-viewport
 
    draw-slate
 
-   GL_PROJECTION glMatrixMode glPopMatrix
-   GL_MODELVIEW  glMatrixMode glPopMatrix
+   GL_PROJECTION glMatrixMode glPopMatrix glLoadIdentity
+   GL_MODELVIEW  glMatrixMode glPopMatrix glLoadIdentity
 
    dup
    find-world
-   default-coordinate-system
+   ! The world coordinate system is a little wacky:
+   dup { [ drop 0 ] [ width ] [ height ] [ drop 0 ] } cleave -1 1 glOrtho
    setup-viewport
    drop
-   drop ;
\ No newline at end of file
+   drop ;
+
+! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!