Index: /trunk/ccl/examples/cocoa-editor.lisp
===================================================================
--- /trunk/ccl/examples/cocoa-editor.lisp	(revision 562)
+++ /trunk/ccl/examples/cocoa-editor.lisp	(revision 563)
@@ -5,5 +5,6 @@
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-  (require "COCOA-WINDOW"))
+  (require "COCOA-WINDOW")
+  (require "HEMLOCK-TEXTSTORAGE"))
 
 (declaim