diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index f9309d83b..5f4658281 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,16 @@
+2000-09-29  Neil Jerram  <neil@ossau.uklinux.net>
+
+	* net_db.c (scm_inet_ntoa): Docstring fix: missing newline
+	inserted.
+
+	* hashtab.c (scm_hashx_create_handle_x, scm_hashx_ref): Insert
+	spaces between C parameters so that the snarfer doesn't coalesce
+	them all into a single very long-named parameter.
+
+2000-09-27  Neil Jerram  <neil@ossau.uklinux.net>
+
+	* list.c (scm_append): Use @example texinfo markup in docstring.
+
 2000-09-26  Dirk Herrmann  <D.Herrmann@tu-bs.de>
 
 	* strings.c (scm_string, scm_make_string, scm_string_set_x,
diff --git a/libguile/hashtab.c b/libguile/hashtab.c
index e65a4776b..ec3674b06 100644
--- a/libguile/hashtab.c
+++ b/libguile/hashtab.c
@@ -433,7 +433,7 @@ SCM_DEFINE (scm_hashx_get_handle, "hashx-get-handle", 4, 0, 0,
 
 
 SCM_DEFINE (scm_hashx_create_handle_x, "hashx-create-handle!", 5, 0, 0, 
-            (SCM hash,SCM assoc,SCM table,SCM obj,SCM init),
+            (SCM hash, SCM assoc, SCM table, SCM obj, SCM init),
 	    "This behaves the same way as the corresponding @code{-create-handle}\n"
 	    "function, but uses @var{hasher} as a\n"
 	    "hash function and @var{assoc} to compare keys.  @code{hasher} must\n"
@@ -452,7 +452,7 @@ SCM_DEFINE (scm_hashx_create_handle_x, "hashx-create-handle!", 5, 0, 0,
 
 
 SCM_DEFINE (scm_hashx_ref, "hashx-ref", 4, 1, 0, 
-            (SCM hash,SCM assoc,SCM table,SCM obj,SCM dflt),
+            (SCM hash, SCM assoc, SCM table, SCM obj, SCM dflt),
 	    "This behaves the same way as the corresponding @code{ref}\n"
 	    "function, but uses @var{hasher} as a\n"
 	    "hash function and @var{assoc} to compare keys.  @code{hasher} must\n"
diff --git a/libguile/list.c b/libguile/list.c
index d141dd2b1..933b04adb 100644
--- a/libguile/list.c
+++ b/libguile/list.c
@@ -192,19 +192,20 @@ SCM_DEFINE (scm_length, "length", 1, 0, 0,
 SCM_DEFINE (scm_append, "append", 0, 0, 1, 
             (SCM args),
             "Returns a list consisting of the elements of the first LIST\n"
-            "followed by the elements of the other LISTs.\n"
-            "\n"
-            "  (append '(x) '(y))          =>  (x y)\n"
-            "  (append '(a) '(b c d))      =>  (a b c d)\n"
-            "  (append '(a (b)) '((c)))    =>  (a (b) (c))\n"
-            "\n"
-            "The resulting list is always newly allocated, except that it shares\n"
-            "structure with the last LIST argument.  The last argument may\n"
-            "actually be any object; an improper list results if the last\n"
-            "argument is not a proper list.\n"
-
-            "  (append '(a b) '(c . d))    =>  (a b c . d)\n"
-            "  (append '() 'a)             =>  a\n")
+	    "followed by the elements of the other LISTs.\n\n"
+	    "@example\n"
+	    "  (append '(x) '(y))          =>  (x y)\n"
+	    "  (append '(a) '(b c d))      =>  (a b c d)\n"
+	    "  (append '(a (b)) '((c)))    =>  (a (b) (c))\n"
+	    "@end example\n\n"
+	    "The resulting list is always newly allocated, except that it shares\n"
+	    "structure with the last LIST argument.  The last argument may\n"
+	    "actually be any object; an improper list results if the last\n"
+	    "argument is not a proper list.\n\n"
+	    "@example\n"
+	    "  (append '(a b) '(c . d))    =>  (a b c . d)\n"
+	    "  (append '() 'a)             =>  a\n"
+	    "@end example")
 #define FUNC_NAME s_scm_append
 {
   SCM_VALIDATE_REST_ARGUMENT (args);
diff --git a/libguile/net_db.c b/libguile/net_db.c
index 768f718bb..502892411 100644
--- a/libguile/net_db.c
+++ b/libguile/net_db.c
@@ -108,7 +108,7 @@ SCM_DEFINE (scm_inet_ntoa, "inet-ntoa", 1, 0, 0,
 	    "Converts an integer Internet host address into a string with the\n"
 	    "traditional dotted decimal representation.\n\n"
 	    "@smalllisp\n"
-	    "(inet-ntoa 2130706433) @result{} \"127.0.0.1\""
+	    "(inet-ntoa 2130706433) @result{} \"127.0.0.1\"\n"
 	    "@end smalllisp")
 #define FUNC_NAME s_scm_inet_ntoa
 {