[cl-net-snmp-cvs] r86 - vendor/cl-http/server

[ctian at common-lisp.net]

Author: ctian
Date: Sat Oct 20 03:01:42 2007
New Revision: 86

Modified:
   vendor/cl-http/server/scripts.lisp
Log:
match LispWorks 5's API


Modified: vendor/cl-http/server/scripts.lisp
==============================================================================
--- vendor/cl-http/server/scripts.lisp	(original)
+++ vendor/cl-http/server/scripts.lisp	Sat Oct 20 03:01:42 2007
@@ -342,7 +342,7 @@
            :script
            :script script args)))
 
-(defmethod documentation ((script script) #-(or CMU LispWorks4) &optional doc-type)
+(defmethod documentation ((script script) #-(or CMU LispWorks4 LispWorks5) &optional doc-type)
   (declare (ignore doc-type))
   (http:get-value script :documentation))