diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index dda96bfc8..b68f9bea0 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,8 @@
+2002-11-16  Dirk Herrmann  <D.Herrmann@tu-bs.de>
+
+	* boot-9.scm (define-private, export-syntax, export-syntax):
+	Fixed my previous fix (blush).
+
 2002-11-16  Dirk Herrmann  <D.Herrmann@tu-bs.de>
 
 	* boot-9.scm (define-private, export-syntax, export-syntax):
diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index 629617890..f470020cf 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -2592,7 +2592,7 @@
      (error "use-syntax can only be used at the top level"))))
 
 (defmacro define-private args
-  `(define ,args))
+  `(define ,@args))
 
 (defmacro define-public args
   (define (syntax)
@@ -2668,10 +2668,10 @@
      (error "re-export can only be used at the top level"))))
 
 (defmacro export-syntax names
-  `(export ,names))
+  `(export ,@names))
 
 (defmacro export-syntax names
-  `(export ,names))
+  `(export ,@names))
 
 (define load load-module)