basis: ERROR: changes.

[factor.git] / basis / io / files / info / windows / windows.factor

diff --git a/basis/io/files/info/windows/windows.factor b/basis/io/files/info/windows/windows.factor
index fc651c366b8480bc9d374a593e670e0a14aea6a2..0f1266c1a9b458eb553eb1b94b01c21c0b68081a 100755 (executable)
--- a/basis/io/files/info/windows/windows.factor
+++ b/basis/io/files/info/windows/windows.factor
@@ -147,7 +147,7 @@ ERROR: not-absolute-path ;
         [ length 2 >= ]
         [ second CHAR: : = ]
         [ first Letter? ]
-    } 1&& [ 2 head "\\" append ] [ not-absolute-path ] if ;
+    } 1&& [ 2 head "\\" append ] [ throw-not-absolute-path ] if ;
 
 <PRIVATE