basis: ERROR: changes.

[factor.git] / basis / unix / groups / groups.factor

diff --git a/basis/unix/groups/groups.factor b/basis/unix/groups/groups.factor
index e51ccc40c47632b829f2de706279cf803a162be2..9138a2f5335c7424fa1ef5358ccdc6f4a5d975a9 100644 (file)
--- a/basis/unix/groups/groups.factor
+++ b/basis/unix/groups/groups.factor
@@ -62,7 +62,7 @@ PRIVATE>
 ERROR: no-group string ;
 
 : ?group-id ( string -- id )
-    dup group-struct [ nip gr_gid>> ] [ no-group ] if* ;
+    dup group-struct [ nip gr_gid>> ] [ throw-no-group ] if* ;
 
 <PRIVATE