mirror of
https://mzte.de/git/LordMZTE/dotfiles.git
synced 2025-03-04 19:29:59 +01:00
rash: show last command time in prompt
This commit is contained in:
parent
ca4d26eec6
commit
4ef23e4cc1
1 changed files with 3 additions and 2 deletions
|
@ -7,14 +7,15 @@
|
|||
(provide nv)
|
||||
|
||||
(current-prompt-function
|
||||
(λ (#:last-return-value retval)
|
||||
(λ (#:last-return-value retval
|
||||
#:last-command-duration duration)
|
||||
(unless (void? retval)
|
||||
(display ((current-rash-top-level-print-formatter) retval)))
|
||||
|
||||
(parameterize ([current-environment-variables (environment-variables-copy (current-environment-variables))])
|
||||
(putenv "MZPROMPT_STATUS" (if (exn:fail? retval) "1" "0"))
|
||||
(putenv "MZPROMPT_FISH_MODE" "insert")
|
||||
(putenv "MZPROMPT_DURATION" "0")
|
||||
(putenv "MZPROMPT_DURATION" (number->string duration))
|
||||
(putenv "MZPROMPT_JOBS" "0")
|
||||
(readline-prompt #{prompt show |> port->bytes}))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue