diff options
-rw-r--r-- | .ocamlinit | 4 | ||||
-rw-r--r-- | .zshrc | 14 |
2 files changed, 5 insertions, 13 deletions
@@ -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);; @@ -51,12 +51,8 @@ PROMPT="%{$fg[black]%}ā[" PROMPT+="%(0?..$fg[red]%?$fg[black]:)" # if any, number of jobs PROMPT+="%(1j.$fg[green]%j$fg[black]:.)" -# # name and host (red for root) -# PROMPT+="%{%(!.$fg[red].$fg[magenta])%}%n@%M%E " -# name (red for root) -PROMPT+="%{%(!.$fg[red].$fg[magenta])%}%n" -# host -PROMPT+="%{$fg[yellow]%}@%{$fg[magenta]%}%M%E " +# name and host (red for root) +PROMPT+="%{%(!.$fg[red].$fg[magenta])%}%n@%M%E " # current location, with one level of parent context PROMPT+="%{$fg[blue]%}%2c" # newline @@ -69,10 +65,8 @@ PROMPT="%{%B$fg[white]%}ā[" PROMPT+="%(0?..$fg[red]%?$fg[white]:)" # if any, number of jobs PROMPT+="%(1j.$fg[green]%j$fg[white]:.)" -# name (red for root) -PROMPT+="%{%(!.$fg[red].$fg[magenta])%}%n" -# host -PROMPT+="%{$fg[yellow]%}@%{$fg[magenta]%}%M%E " +# name and host (red for root) +PROMPT+="%{%(!.$fg[red].$fg[magenta])%}%n@%M%E " # current location, with one level of parent context PROMPT+="%{$fg[blue]%}%2c" # newline |