From 75e93f3da29b90ab2de193d79fe028dd75cfb2d5 Mon Sep 17 00:00:00 2001 From: Toralf Wittner Date: Tue, 29 Apr 2014 09:24:25 +0200 Subject: [PATCH] Tweak precedence. --- src/System/Logger/Message.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/System/Logger/Message.hs b/src/System/Logger/Message.hs index f3f8077..1e312ca 100644 --- a/src/System/Logger/Message.hs +++ b/src/System/Logger/Message.hs @@ -94,7 +94,7 @@ infixr 4 ~~ -- | Concatenate two 'ToBytes' values. (+++) :: (ToBytes a, ToBytes b) => a -> b -> Builder a +++ b = bytes a <> bytes b -infixr 5 +++ +infixr 6 +++ -- | Type restriction. Useful to disambiguate string literals when -- using @OverloadedStrings@ pragma. -- GitLab