From 8a1a6e410499cbc5c0685287847b290be7ccbba8 Mon Sep 17 00:00:00 2001 From: katherine Date: Tue, 4 Dec 2018 05:56:33 -0700 Subject: prompt tweak a single colour is better after all, rather than separating with yellow --- .ocamlinit | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to '.ocamlinit') diff --git a/.ocamlinit b/.ocamlinit index 67acc2b..a125263 100644 --- a/.ocamlinit +++ b/.ocamlinit @@ -19,9 +19,7 @@ let host = Unix.gethostname () in let formatted = LTerm_text.eval [B_bold true; B_fg (LTerm_style.white); S "ā”Œ["; - B_fg (LTerm_style.lmagenta); S (Printf.sprintf "ocaml-%s" version); - B_fg (LTerm_style.lyellow); S "@"; - B_fg (LTerm_style.lmagenta); S (Printf.sprintf "%s " host); + B_fg (LTerm_style.lmagenta); S (Printf.sprintf "ocaml-%s@%s " version host); B_fg (LTerm_style.lcyan); S (Printf.sprintf "%s" path); B_fg (LTerm_style.white); S "]\nā””: "] in UTop.prompt := fst (React.S.create formatted);; -- cgit v1.2.3