[cxml-cvs] CVS cxml/test

[dlichteblau]

Update of /project/cxml/cvsroot/cxml/test
In directory clnet:/tmp/cvs-serv30886/test

Modified Files:
	domtest.lisp 
Log Message:
DTC patch-dom
o translate-uri-equals: should work on all CL implementations, not
  just the Allegro CL because 'puri' is used for compatibility.


--- /project/cxml/cvsroot/cxml/test/domtest.lisp	2006/08/20 11:48:58	1.17
+++ /project/cxml/cvsroot/cxml/test/domtest.lisp	2007/06/16 09:52:15	1.18
@@ -274,13 +274,6 @@
   (with-attributes (|type|) element 
    `(equal ,|type| "text/xml")))
 
-#-allegro
-(defun translate-uri-equals (element)
-  (declare (ignore element))
-  (warn "oops, assert-uri-equals needs Franz' URI package")
-  (throw 'give-up nil))
-
-#+allegro
 (defun translate-uri-equals (element)
   (with-attributes
       (|actual|