]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/cairo-demo/cairo-demo.factor
change ERROR: words from throw-foo back to foo.
[factor.git] / extra / cairo-demo / cairo-demo.factor
index 30efcebb243904023a7062414a367e22c2419067..b08729b7a1d8c1b2faf6af50894623667251f10a 100644 (file)
@@ -44,7 +44,7 @@ ERROR: no-cairo-t ;
 <PRIVATE
 
 : draw-hello-world ( gadget -- )
-    cairo-t>> [ throw-no-cairo-t ] unless*
+    cairo-t>> [ no-cairo-t ] unless*
     {
         [
             "Sans" CAIRO_FONT_SLANT_NORMAL CAIRO_FONT_WEIGHT_BOLD