summaryrefslogtreecommitdiff
path: root/scheme/racket
diff options
context:
space:
mode:
Diffstat (limited to 'scheme/racket')
-rw-r--r--scheme/racket/geiser/user.rkt6
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))