[nongnu] elpa/geiser-chez 501fa22da4 06/15: whitespace and spurious rest arg

[ELPA Syncer]

branch: elpa/geiser-chez
commit 501fa22da461a0d739cfb977daa6bf0c163b7dd4
Author: jao <jao@gnu.org>
Commit: jao <jao@gnu.org>

    whitespace and spurious rest arg
---
 src/geiser/geiser.ss | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/src/geiser/geiser.ss b/src/geiser/geiser.ss
index e506a746c9..960b71afd9 100644
--- a/src/geiser/geiser.ss
+++ b/src/geiser/geiser.ss
@@ -164,20 +164,16 @@
                 `(,operator ("value" . ,(value->string binding)))))
           '())))
 
-  (define (geiser:autodoc ids . rest)
+  (define (geiser:autodoc ids)
     (cond ((null? ids) '())
           ((not (list? ids)) (geiser:autodoc (list ids)))
           ((not (symbol? (car ids))) (geiser:autodoc (cdr ids)))
           (else (map operator-arglist ids))))
 
-  (define (geiser:no-values)
-    #f)
+  (define (geiser:no-values) #f)
 
-  (define (geiser:newline)
-    #f)
+  (define (geiser:newline) #f)
 
   (define (geiser:macroexpand form . rest)
     (with-output-to-string
-      (lambda ()
-        (pretty-print
-         (syntax->datum (expand form)))))))
+      (lambda () (pretty-print (syntax->datum (expand form)))))))