From 1ae7b87851c6676f5a99420b54e5e75eb1081c31 Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Sat, 3 May 2003 22:36:36 +0000
Subject: [PATCH] (SRFI-1 Fold and Map): Fix typo "... variant of fold", add
 "f" to fold call shown.

---
 doc/ref/srfi-modules.texi | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/doc/ref/srfi-modules.texi b/doc/ref/srfi-modules.texi
index 121f448db..1c808b666 100644
--- a/doc/ref/srfi-modules.texi
+++ b/doc/ref/srfi-modules.texi
@@ -431,8 +431,8 @@ instead of the list elements.
 @end deffn
 
 @deffn {Scheme Procedure} reduce f ridentity lst
-@code{reduce} is a variant of @code{reduce}.  If @var{lst} is
-@code{()}, @var{ridentity} is returned.  Otherwise, @code{(fold (car
+@code{reduce} is a variant of @code{fold}.  If @var{lst} is
+@code{()}, @var{ridentity} is returned.  Otherwise, @code{(fold f (car
 @var{lst}) (cdr @var{lst}))} is returned.
 @end deffn
 
-- 
2.20.1