--- a/trunk/plugins_src/commands/wpc_absolute_move.erl
+++ b/trunk/plugins_src/commands/wpc_absolute_move.erl
@@ -8,7 +8,7 @@
 %%  See the file "license.terms" for information on usage and redistribution
 %%  of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 %%
-%%     $Id: wpc_absolute_move.erl 580 2009-04-18 08:58:04Z bjorng $
+%%     $Id: wpc_absolute_move.erl 599 2009-04-24 04:39:31Z bjorng $
 %%
 -module(wpc_absolute_move).
 
@@ -167,7 +167,7 @@
         _ ->
             MirrorVerts = wings_face:vertices_cw(Mirror,We),
             MVSet = gb_sets:from_list(MirrorVerts),
-            case gb_sets:empty(gb_sets:intersection(MVSet,VSet)) of
+            case gb_sets:is_disjoint(MVSet,VSet) of
                 true -> check_mirror(Rest,Shs);
                 false -> true
             end