--- common-lisp-controller.lisp~	2010-07-30 20:29:24.000000000 -0400
+++ common-lisp-controller.lisp	2010-11-04 17:51:35.604803920 -0400
@@ -46,7 +46,7 @@
   (setf *implementation-name* implementation-name)
   
   (pushnew :common-lisp-controller *features*)
-  (pushnew :clc-os-debian *features*))
+  (pushnew :clc-os-tld *features*))
 
 (defun compile-common-lisp-controller-v5 (implementation-name)
   "Compiles the clc files. Returns a list of fasls
@@ -54,7 +54,7 @@
   (setf *implementation-name* implementation-name)
 
   (pushnew :common-lisp-controller *features*)
-  (pushnew :clc-os-debian *features*)
+  (pushnew :clc-os-tld *features*)
 
   (let* ((fasl-root (merge-pathnames
 		     (make-pathname