change ERROR: words from throw-foo back to foo.

[factor.git] / extra / images / png / png.factor

diff --git a/extra/images/png/png.factor b/extra/images/png/png.factor
index 611c0308ecd8c54ef6d8c8c850ad3cf7dbdf81b4..ffd0a7a09dafe7bb48f73ca76490cf5259af05c5 100644 (file)
--- a/extra/images/png/png.factor
+++ b/extra/images/png/png.factor
@@ -56,7 +56,7 @@ ERROR: bad-png-header header ;
 
 : read-png-header ( -- )
     8 read dup png-header sequence= [
-        throw-bad-png-header
+        bad-png-header
     ] unless drop ;
 
 ERROR: bad-checksum ;