branch: elpa/geiser-racket
commit cfc494df9a0c9b9aff5bedac2bc277540a2e9ea7
Author: Jose Antonio Ortega Ruiz <j...@gnu.org>
Commit: Jose Antonio Ortega Ruiz <j...@gnu.org>

    Racket: fix for kwargs display.
---
 geiser/autodoc.rkt | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/geiser/autodoc.rkt b/geiser/autodoc.rkt
index ac66da9..9cf681c 100644
--- a/geiser/autodoc.rkt
+++ b/geiser/autodoc.rkt
@@ -130,13 +130,12 @@
                                        req
                                        (cons (car formals) opt)
                                        keys))
-          ((keyword? (car formals)) (let* ((kname
-                                            (keyword->symbol (car formals)))
+          ((keyword? (car formals)) (let* ((kname (car formals))
                                            (arg-id (cadr formals))
                                            (name (if (pair? arg-id)
                                                      (list kname
                                                            (cadr arg-id))
-                                                     kname)))
+                                                     (list kname))))
                                       (loop (cddr formals)
                                             req
                                             opt

Reply via email to