]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/slides/slides.factor
Fixing everything for mandatory stack effects
[factor.git] / extra / slides / slides.factor
index b58253381cb1085eac99a0c82ff8818a0d70be11..1c8b4fcbb30b76df5006af3a194256c11575c3c8 100755 (executable)
@@ -53,7 +53,7 @@ IN: slides
         gadget.
     ] ($block) ;
 
-: page-theme
+: page-theme ( gadget -- )
     T{ gradient f { { 0.8 0.8 1.0 1.0 } { 0.8 1.0 1.0 1.0 } } }
     swap set-gadget-interior ;