;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Aug 2002
;;;;
-;;;; $Id: lml.asd,v 1.8 2002/09/19 23:32:37 kevin Exp $
+;;;; $Id: lml.asd,v 1.10 2002/09/30 10:26:43 kevin Exp $
;;;;
;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
(defsystem :lml
:name "cl-lml"
:author "Kevin M. Rosenberg <kmr@debian.org>"
- :version "1.0.5"
+ :version "1.0.7"
:maintainer "Kevin M. Rosenberg <kmr@debian.org>"
:licence "GNU General Public License"
:description "Lisp Markup Language"
(:file "downloads" :depends-on ("lml"))
))
-(defmethod source-file-type ((c cl-source-file) (s (eql (find-system 'lml))))
- "cl")
+(when (ignore-errors (find-class 'load-compiled-op))
+ (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :lml))))
+ (pushnew :lml cl:*features*)))