X-Git-Url: http://git.kpe.io/?p=pubmed.git;a=blobdiff_plain;f=pubmed.asd;h=07dfdab64013dd6ab87a96e1dc901bf8908bb821;hp=c50d5d840384541849ba58f5db4beada2d8410aa;hb=b83e11568554b44f6ef128655db363d180eb58c0;hpb=5af26ca9e1400de133db12941dab397dc30d1c27

diff --git a/pubmed.asd b/pubmed.asd
index c50d5d8..07dfdab 100644
--- a/pubmed.asd
+++ b/pubmed.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Sep 2002
 ;;;;
-;;;; $Id: pubmed.asd,v 1.2 2002/10/31 01:54:12 kevin Exp $
+;;;; $Id: pubmed.asd,v 1.3 2002/11/08 16:51:40 kevin Exp $
 ;;;;
 ;;;; This file, part of cl-pubmed, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -22,7 +22,7 @@
 #+(and allegro (not common-lisp-controller)) (require :aserve)
 
 ;; only define system on implementations that aserve is available
-#+(or allegro lispworks cmucl mcl openmcl)
+#+(or allegro lispworks cmucl mcl openmcl scl clisp)
 (defsystem :pubmed
   :name "cl-pubmed"
   :author "Kevin M. Rosenberg <kevin@rosenberg.net>"
@@ -39,9 +39,5 @@
   
   :depends-on (:kmrcl #-allegro :aserve))
 
-;; only define system on implementations that aserve is available
-#+(or allegro lispworks cmucl mcl openmcl)
-(when (ignore-errors (find-class 'load-compiled-op))
-  (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :pubmed))))
-    (pushnew :pubmed cl:*features*)))
+