X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=clsql-mysql.asd;h=44789a6a05a4fcc10da3a2c529904821170e0f1c;hb=4e3928e3c78a9953a1de5c5d89241625b38671ff;hp=b8796dccde1e4b59c36716147e456a430fc365d2;hpb=9f6b242d508ed11519a1e48f360bc59842e39112;p=clsql.git

diff --git a/clsql-mysql.asd b/clsql-mysql.asd
index b8796dc..44789a6 100644
--- a/clsql-mysql.asd
+++ b/clsql-mysql.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: clsql-mysql.asd,v 1.2 2002/08/23 19:39:56 kevin Exp $
+;;;; $Id: clsql-mysql.asd,v 1.4 2002/09/06 10:26:17 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -23,7 +23,6 @@
 ;;; System definition
 
 (defsystem clsql-mysql
-  :default-component-class clsql-cl-source-file
   :pathname #.(format nil "~A:clsql-mysql;" +clsql-logical-host+)
   :components ((:file "mysql-package")
 	       (:file "mysql-loader" :depends-on ("mysql-package"))
@@ -33,6 +32,7 @@
   :depends-on (:uffi :clsql-base :clsql-uffi))
 
 
-
-
+(defmethod source-file-type  ((c cl-source-file)
+			      (s (eql (find-system 'clsql-mysql)))) 
+   "cl")