diff --git a/doc/examples/Query.hs b/doc/examples/Query.hs
index 40474fd9..ce397572 100644
--- a/doc/examples/Query.hs
+++ b/doc/examples/Query.hs
@@ -184,7 +184,7 @@ main = handleSqlError' $ withConnectionIO connect $ \conn -> do
   run join1' ()
   run selfJoin1 ()
   run selfJoin1' ()
-  --run union1 ()
-  --run union1' ()
+  run union1 ()
+  run union1' ()
   run group1 ()