diff options
Diffstat (limited to 'scheme')
-rw-r--r-- | scheme/racket/geiser/user.rkt | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/scheme/racket/geiser/user.rkt b/scheme/racket/geiser/user.rkt index 9d5b169..e379946 100644 --- a/scheme/racket/geiser/user.rkt +++ b/scheme/racket/geiser/user.rkt @@ -66,9 +66,6 @@ [_ form]))) (define geiser-prompt - (lambda () (printf "> "))) - -(define geiser-server-prompt (lambda () (printf "racket@~a> " (namespace->module-name (current-namespace))))) @@ -86,8 +83,7 @@ (current-output-port out) (current-error-port out) (current-load/use-compiled geiser-loader) - (current-prompt-read (geiser-prompt-read - geiser-server-prompt))] + (current-prompt-read (geiser-prompt-read geiser-prompt))] (read-eval-print-loop))) (define server-channel (make-channel)) |