diff --git a/scheme/xlib/xlib-type-interfaces.scm b/scheme/xlib/xlib-type-interfaces.scm
index 5de425c..3fe21b0 100644
--- a/scheme/xlib/xlib-type-interfaces.scm
+++ b/scheme/xlib/xlib-type-interfaces.scm
@@ -7,7 +7,7 @@
 	  alist-split
 	  vector-map!))
 
-;; these are internal interfaces that describe the construction and access 
+;; these are internal interfaces that describe the construction and access
 ;; functions to all the new datatypes. They are not needed by the user
 
 (define-interface xlib-display-type-interface
@@ -34,6 +34,7 @@
 
 (define-interface xlib-color-type-interface
   (export internal-make-color
+	  create-color
 	  color?
 	  color-Xcolor))