From 59f47d731f603c768d1995d7b7cc27dcca33908c Mon Sep 17 00:00:00 2001
From: "Heinz N. Gies" <heinz@licenser.net>
Date: Tue, 22 Sep 2015 18:41:28 +0200
Subject: [PATCH] Fix bug where a colours would override underline

---
 src/cf.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cf.erl b/src/cf.erl
index a756e47..6fbe873 100644
--- a/src/cf.erl
+++ b/src/cf.erl
@@ -90,7 +90,7 @@ format(Fmt) ->
 -define(R,   "\033[0m").
 -define(CFMT(Char, Colour),
         cfmt_([$~, $!, Char | S], Enabled) -> [Colour | cfmt_(S, Enabled)];
-        cfmt_([$~, $!,  $_, Char | S], Enabled) -> [?U, Colour | cfmt_(S, Enabled)]).
+        cfmt_([$~, $!,  $_, Char | S], Enabled) -> [Colour, ?U | cfmt_(S, Enabled)]).
 -define(CFMT_BG(Char, Colour),
         cfmt_([$~, $#, Char | S], Enabled) -> [Colour | cfmt_(S, Enabled)]).
 -define(CFMT_U(Char, Colour),