X-Git-Url: http://git.kpe.io/?p=wol.git;a=blobdiff_plain;f=wol.asd;h=21f671ee7344147ef9745dc2faf27b774f88ef17;hp=65eeb7022a134416cc8737cbbd68b083914a2db8;hb=7a32ea0dccd70ba9ac40122e929980726feb1357;hpb=628dda3f26ad183880fea5871c37b9cfa33b425a

diff --git a/wol.asd b/wol.asd
index 65eeb70..21f671e 100644
--- a/wol.asd
+++ b/wol.asd
@@ -7,14 +7,15 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  July 2003
 ;;;;
-;;;; $Id: wol.asd,v 1.6 2003/08/09 21:42:24 kevin Exp $
+;;;; $Id: wol.asd,v 1.8 2003/08/10 17:56:44 kevin Exp $
 ;;;;
 ;;;; This file and Wol are Copyright (c) 2003 by Kevin M. Rosenberg
 ;;;; *************************************************************************
 
 (in-package #:cl-user)
 
-#+(or cmu lispworks (and allegro (not common-lisp-controller))) (require :aserve)
+#+(or cmu lispworks sbcl openmcl 
+      (and allegro (not common-lisp-controller))) (require :aserve)
 #+(and allegro common-lisp-controller) (c-l-c::original-require :aserve)
 #+allegro (require :smtp)
 #+allegro (require :phtml)
@@ -43,7 +44,7 @@
 
 (defmethod perform ((o test-op) (c (eql (find-system 'wol))))
   (operate 'load-op 'wol-tests)
-  (operate 'test-op 'wol-tests))
+  (operate 'test-op 'wol-tests :force t))
 
 (defsystem wol-tests
     :depends-on (wol xlunit)