[nongnu] elpa/geiser-guile a96b437 053/284: turn-on/off-geiser-mode commands added and used in scheme-mode-hook.

[Philip Kaludercic]

branch: elpa/geiser-guile
commit a96b437ed38a25e09543cdaf761d9574776754bc
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>

    turn-on/off-geiser-mode commands added and used in scheme-mode-hook.
---
 geiser/doc.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/geiser/doc.scm b/geiser/doc.scm
index f655fd6..578e6a3 100644
--- a/geiser/doc.scm
+++ b/geiser/doc.scm
@@ -138,8 +138,8 @@
   (let* ((letts (list->vector '(#\x #\y #\z #\u #\v #\w #\t)))
          (len (vector-length letts))
          (lett (lambda (n) (vector-ref letts (modulo n len)))))
-    (map (lambda (n) (string->symbol (format "~A" (lett (+ fst n -1)))))
-         (iota (max count 1)))))
+    (map (lambda (n) (string->symbol (format "~A" (lett (- n 1)))))
+         (iota (max count 1) fst))))
 
 (define (arglist->args arglist)
   `((required . ,(car arglist))