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

[factor.git] / core / source-files / source-files.factor

diff --git a/core/source-files/source-files.factor b/core/source-files/source-files.factor
index dbdd042778fec91bf3175a973ed5e7e8dc3a95a5..2575ea686ff495b9c7d4f4c80aff9c9e83f960ff 100644 (file)
--- a/core/source-files/source-files.factor
+++ b/core/source-files/source-files.factor
@@ -33,7 +33,7 @@ main ;
 ERROR: invalid-source-file-path path ;
 
 : path>source-file ( path -- source-file )
-    dup string? [ throw-invalid-source-file-path ] unless
+    dup string? [ invalid-source-file-path ] unless
     source-files get [ <source-file> ] cache ;
 
 : reset-checksums ( -- )