* Documentation work.

3 files changed, 12 insertions, 6 deletions

diff --git a/srfi/ChangeLog b/srfi/ChangeLog
index 287f65bf6..85125714f 100644
--- a/srfi/ChangeLog
+++ b/srfi/ChangeLog
@@ -1,3 +1,9 @@
+2001-11-07  Neil Jerram  <neil@ossau.uklinux.net>
+
+	* srfi-13.c (scm_string_unfold, scm_string_unfold_right),
+	srfi-14.c (scm_char_set_unfold, scm_char_set_unfold_x): Remove
+	superfluous whitespace at end of docstring lines.
+
 2001-11-06  Thien-Thi Nguyen  <ttn@glug.org>
 
 	* srfi-19.scm (time-monotonic->time-monotonic): Spurious;
diff --git a/srfi/srfi-13.c b/srfi/srfi-13.c
index 231e2adaa..3d32cf744 100644
--- a/srfi/srfi-13.c
+++ b/srfi/srfi-13.c
@@ -2521,7 +2521,7 @@ SCM_DEFINE (scm_string_unfold, "string-unfold", 4, 2, 0,
 	    "@dots{}\n"
 	    "@item @var{p} tells us when to stop -- when it returns true\n"
 	    "when applied to one of these seed values.\n"
-	    "@item @var{f} maps each seed value to the corresponding \n"
+	    "@item @var{f} maps each seed value to the corresponding\n"
 	    "character in the result string.  These chars are assembled\n"
 	    "into the string in a left-to-right order.\n"
 	    "@item @var{base} is the optional initial/leftmost portion\n"
@@ -2583,7 +2583,7 @@ SCM_DEFINE (scm_string_unfold_right, "string-unfold-right", 4, 2, 0,
 	    "@dots{}\n"
 	    "@item @var{p} tells us when to stop -- when it returns true\n"
 	    "when applied to one of these seed values.\n"
-	    "@item @var{f} maps each seed value to the corresponding \n"
+	    "@item @var{f} maps each seed value to the corresponding\n"
 	    "character in the result string.  These chars are assembled\n"
 	    "into the string in a right-to-left order.\n"
 	    "@item @var{base} is the optional initial/rightmost portion\n"
diff --git a/srfi/srfi-14.c b/srfi/srfi-14.c
index c5a491786..1f3abae7d 100644
--- a/srfi/srfi-14.c
+++ b/srfi/srfi-14.c
@@ -317,11 +317,11 @@ SCM_DEFINE (scm_char_set_unfold, "char-set-unfold", 4, 1, 0,
 	    (SCM p, SCM f, SCM g, SCM seed, SCM base_cs),
 	    "This is a fundamental constructor for character sets.\n"
 	    "@itemize @bullet\n"
-	    "@item @var{g} is used to generate a series of ``seed'' values \n"
+	    "@item @var{g} is used to generate a series of ``seed'' values\n"
 	    "from the initial seed: @var{seed}, (@var{g} @var{seed}),\n"
 	    "(@var{g}^2 @var{seed}), (@var{g}^3 @var{seed}), @dots{}\n"
 	    "@item @var{p} tells us when to stop -- when it returns true\n"
-	    "when applied to one of the seed values. \n"
+	    "when applied to one of the seed values.\n"
 	    "@item @var{f} maps each seed value to a character. These\n"
 	    "characters are added to the base character set @var{base_cs} to\n"
 	    "form the result; @var{base_cs} defaults to the empty set.\n"
@@ -362,10 +362,10 @@ SCM_DEFINE (scm_char_set_unfold_x, "char-set-unfold!", 5, 0, 0,
 	    "This is a fundamental constructor for character sets.\n"
 	    "@itemize @bullet\n"
 	    "@item @var{g} is used to generate a series of ``seed'' values\n"
-	    "from the initial seed: @var{seed}, (@var{g} @var{seed}), \n"
+	    "from the initial seed: @var{seed}, (@var{g} @var{seed}),\n"
 	    "(@var{g}^2 @var{seed}), (@var{g}^3 @var{seed}), @dots{}\n"
 	    "@item @var{p} tells us when to stop -- when it returns true\n"
-	    "when applied to one of the seed values. \n"
+	    "when applied to one of the seed values.\n"
 	    "@item @var{f} maps each seed value to a character. These\n"
 	    "characters are added to the base character set @var{base_cs} to\n"
 	    "form the result; @var{base_cs} defaults to the empty set.\n"