slight syntactical cleanup

diff --git a/lib/Data/Query/Renderer/SQL/Slice/FetchFirst.pm b/lib/Data/Query/Renderer/SQL/Slice/FetchFirst.pm
index 7a3234d..3579215 100644 (file)
--- a/lib/Data/Query/Renderer/SQL/Slice/FetchFirst.pm
+++ b/lib/Data/Query/Renderer/SQL/Slice/FetchFirst.pm
@@ -98,10 +98,14 @@ sub _render_slice {
           \@outside_select_list,
           compose {
             Order($order_map{$b->{by}}, $b->{reverse}, $a)
-          } @order_nodes, Alias($default_inside_alias, $_)
+          } (
+            @order_nodes,
+            Alias($default_inside_alias, $_)
+          )
         )
         : $_
-    } Slice(
+    } (
+      Slice(
         undef, $dq->{limit},
         Select(
           [
@@ -130,6 +134,7 @@ sub _render_slice {
           )
         )
       )
+    )
   );
 }