[Fixup package definition :import statements
clinton@unknownlamer.org**20090428002535
 Ignore-this: ac54022d884a7c8db222f6acf7e691ce
] hunk ./src/packages.lisp 8
-  (:import '(ccl:slot-definition-name ccl:slot-definition-type ccl:slot-definition-initform))
+    (:import-from :ccl :slot-definition-name :slot-definition-type :slot-definition-initform)
hunk ./src/packages.lisp 10
-  (:import '(ccl:class-slots))
+  (:import-from :ccl :class-slots)
hunk ./src/packages.lisp 12
-  (import '(clos:class-slots clos:slot-definition-name
-            clos:slot-definition-type clos:slot-definition-initform))
+  (import-from :clos :class-slots :slot-definition-name
+	       :slot-definition-type :slot-definition-initform)
hunk ./src/packages.lisp 15
-  (:import '(mop:class-slots mop:slot-definition-name mop:slot-definition-type
-            mop:slot-definition-initform))
+  (:import-from :mop :class-slots :slot-definition-name :slot-definition-type
+		:slot-definition-initform)
+  #+sbcl
+  (:import-from :sb-mop :class-slots :slot-definition-name
+	   :slot-definition-type :slot-definition-initform)
hunk ./src/packages.lisp 21
-  (:import '(harlequin-common-lisp:class-slots harlequin-common-lisp:slot-definition-name
-            harlequin-common-lisp:slot-definition-type harlequin-common-lisp:slot-definition-initform))
+  (:import-from :harlequin-common-lisp '(:class-slots :slot-definition-name
+            :slot-definition-type :slot-definition-initform))