Index: /trunk/ccl/hemlock/src/keysym-defs.lisp
===================================================================
--- /trunk/ccl/hemlock/src/keysym-defs.lisp	(revision 558)
+++ /trunk/ccl/hemlock/src/keysym-defs.lisp	(revision 559)
@@ -27,5 +27,5 @@
 ;;; This isn't the RT.
 (eval-when (:compile-toplevel :execute)
-  (use-interface-dir :cocoa))
+  (ccl::use-interface-dir :cocoa))
 
 (hemlock-ext:define-keysym #$NSF1FunctionKey "F1")
