branch: elpa/geiser-racket
commit 99acb215889bb589c4f60e45a8bb11b58ba4d92f
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
Fix indentation
---
geiser/autodoc.rkt | 6 +++---
geiser/modules.rkt | 6 +++---
geiser/user.rkt | 2 +-
3 files changed, 7 insertions(+), 7 deletions(-)
diff --git a/geiser/autodoc.rkt b/geiser/autodoc.rkt
index 04a0c09..b7f6289 100644
--- a/geiser/autodoc.rkt
+++ b/geiser/autodoc.rkt
@@ -27,9 +27,9 @@
(define (preload-help)
(set! loader-thread
- (thread (lambda ()
- (with-output-to-string (lambda ()
- (help meh-i-dont-exist)))))))
+ (thread (lambda ()
+ (with-output-to-string (lambda ()
+ (help meh-i-dont-exist)))))))
(define here (current-namespace))
diff --git a/geiser/modules.rkt b/geiser/modules.rkt
index 93d8b79..77a404a 100644
--- a/geiser/modules.rkt
+++ b/geiser/modules.rkt
@@ -14,7 +14,7 @@
(provide load-module
ensure-module-spec
module-spec->namespace
- namespace->module-name
+ namespace->module-name
namespace->module-path-name
module-path-name->name
module-spec->path-name
@@ -221,7 +221,7 @@
module-cache)
(define (startup)
- (thread update-module-cache)
- (void))
+ (thread update-module-cache)
+ (void))
(startup)
diff --git a/geiser/user.rkt b/geiser/user.rkt
index b936219..b136dcd 100644
--- a/geiser/user.rkt
+++ b/geiser/user.rkt
@@ -91,7 +91,7 @@
(flush-output (current-error-port))
(flush-output (current-output-port))
(let* ([in ((current-get-interaction-input-port))]
- [form ((current-read-interaction) (object-name in) in)])
+ [form ((current-read-interaction) (object-name in) in)])
(syntax-case form ()
[(uq cmd) (eq? 'unquote (syntax-e #'uq))
(case (syntax-e #'cmd)
