From 45083642667fce8a1f6d1491f3487243416e8cc0 Mon Sep 17 00:00:00 2001
From: Danny Navarro <j@dannynavarro.net>
Date: Tue, 22 Sep 2015 11:16:36 +0200
Subject: [PATCH] Fix alias colon order

---
 Data/GraphQL/Printer.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Data/GraphQL/Printer.hs b/Data/GraphQL/Printer.hs
index 7b222b6..4a4d67e 100644
--- a/Data/GraphQL/Printer.hs
+++ b/Data/GraphQL/Printer.hs
@@ -52,7 +52,7 @@ selection (SelectionFragmentSpread x) = fragmentSpread x
 
 field :: Field -> Text
 field (Field alias name args ds ss) =
-       optempty (cons ':') alias
+       optempty (`snoc` ':') alias
     <> name
     <> optempty arguments args
     <> optempty directives ds