From 7b2dd6c651a455be09e209828905b99605c8dfb3 Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Tue, 15 Jul 2014 10:13:28 +0400
Subject: [PATCH] Still not sure

---
 main.ml | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/main.ml b/main.ml
index 3e82e5a..87959b0 100644
--- a/main.ml
+++ b/main.ml
@@ -3425,10 +3425,8 @@ let genhistoutlines =
   in
   fun orderty ->
     let setorty s t =
-      let s =
-        if orderty = t then "{ " ^ s  ^ " }" else "  " ^ s
-      in s, 0,
-      Oaction (fun () -> Config.historder := t)
+      let s = if orderty = t then "\xe2\x88\x9a " ^ s else "   " ^ s in
+      s, 4, Oaction (fun () -> Config.historder := t)
     in
     let list = ref [] in
     if Config.gethist list
-- 
2.11.4.GIT