mirror of
https://mzte.de/git/LordMZTE/dotfiles.git
synced 2024-11-16 06:52:10 +01:00
16 lines
377 B
Racket
16 lines
377 B
Racket
#lang rash
|
|
(require
|
|
racket/port
|
|
rash/private/rashrc-lib
|
|
readline/pread)
|
|
|
|
(provide nv)
|
|
|
|
(current-prompt-function
|
|
(λ (#:last-return-value retval)
|
|
(unless (void? retval)
|
|
(display ((current-rash-top-level-print-formatter) retval)))
|
|
|
|
(readline-prompt #{prompt show (if (exn:fail? retval) 1 0) insert |> port->bytes})))
|
|
|
|
(define-simple-pipeline-alias nv nvim)
|