[nongnu] elpa/geiser-gauche 0050571 021/119: Minor fix in autodoc

[Philip Kaludercic]

branch: elpa/geiser-gauche
commit 005057138dc35db072f2f6b1729058476d920ef5
Author: András Simonyi <andras.simonyi@gmail.com>
Commit: András Simonyi <andras.simonyi@gmail.com>

    Minor fix in autodoc
---
 geiser.scm | 16 +++++++---------
 1 file changed, 7 insertions(+), 9 deletions(-)

diff --git a/geiser.scm b/geiser.scm
index 498fc07..657111b 100644
--- a/geiser.scm
+++ b/geiser.scm
@@ -116,15 +116,13 @@
         (key '("key"))
         (section :required))
     (dolist (x arg-info)
-           (case x
-             ((:optional :key) (set! section x))
-             ((:rest))
-             (else (case section
-                     ((:optional) (push! optional x))
-                     ((:key) (push! key x))
-                     (else (if (symbol=? x 'args)
-                               (push! required "...")
-                               (push! required x)))))))
+           (if (memq x '(:optional :key :rest))
+               (set! section x)
+               (case section
+                 ((:optional) (push! optional x))
+                 ((:key) (push! key x))
+                 ((:rest) (push! required "..."))
+                 (else (push! required x)))))
     (map (cut reverse <>)
         (list required optional key))))