diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-08-10 15:35:59 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-08-10 15:35:59 +0200 |
| commit | db34b16737120ac0c6951c32b8d1aa838491cf84 (patch) | |
| tree | d72254ebc78f8611b1381ab6ca7bb3018e2e1a1e /scheme/guile/geiser/doc.scm | |
| parent | 94be6173b640411e8205778fc7e080f6fbdac9dc (diff) | |
| download | geiser-guile-db34b16737120ac0c6951c32b8d1aa838491cf84.tar.gz geiser-guile-db34b16737120ac0c6951c32b8d1aa838491cf84.tar.bz2 | |
Guile: fix for rest marker in autodoc.
Diffstat (limited to 'scheme/guile/geiser/doc.scm')
| -rw-r--r-- | scheme/guile/geiser/doc.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme/guile/geiser/doc.scm b/scheme/guile/geiser/doc.scm index e7640e6..3f060e3 100644 --- a/scheme/guile/geiser/doc.scm +++ b/scheme/guile/geiser/doc.scm @@ -78,7 +78,7 @@ (let ((sgn `(,fun ,@req ,@(if (not (null? opt)) (cons 'geiser-opt_marker opt) '()) ,@(if (not (null? key)) (cons 'geiser-key_maker key) '())))) - (if rest `(,@sgn 'geiser-rest_marker ,rest) sgn)))) + (if rest `(,@sgn geiser-rest_marker ,rest) sgn)))) (define (find-position args form) (let* ((lf (length form)) |