unix.groups: cleanup using.

diff --git a/basis/unix/groups/groups.factor b/basis/unix/groups/groups.factor
index 65a26da0ef980fa511caecfa7ae77c2046308a73..ad285a665e2602e7f324c290ab7ec2066e499c93 100644 (file)
--- a/basis/unix/groups/groups.factor
+++ b/basis/unix/groups/groups.factor
@@ -1,11 +1,9 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors alien alien.c-types alien.data alien.strings
-assocs byte-arrays classes.struct combinators
-combinators.short-circuit continuations fry io.encodings.utf8
-kernel math math.parser namespaces sequences splitting strings
-unix unix.ffi unix.users unix.utilities ;
-QUALIFIED: grouping
+USING: accessors alien.c-types alien.data assocs byte-arrays
+classes.struct combinators continuations fry grouping
+io.encodings.utf8 kernel math math.parser namespaces sequences
+strings unix unix.ffi unix.users unix.utilities ;
 IN: unix.groups
 
 TUPLE: group id name passwd members ;
@@ -20,7 +18,7 @@ GENERIC: group-struct ( obj -- group/f )
     gr_mem>> utf8 alien>strings ;
 
 : (group-struct) ( id -- group-struct id group-struct byte-array length void* )
-    [ \ unix.ffi:group <struct> ] dip over 4096
+    [ unix.ffi:group <struct> ] dip over 4096
     [ <byte-array> ] keep f void* <ref> ;
 
 : check-group-struct ( group-struct ptr -- group-struct/f )