1 "{ Package: 'stx:goodies/xmlsuite/xpath' }"

     2 

     3 "{ NameSpace: XMLv2 }"

     4 

     5 XPathDocumentAdaptorTests subclass:#XPathDOM3DocumentAdaptorTests

     6 	instanceVariableNames:''

     7 	classVariableNames:''

     8 	poolDictionaries:''

     9 	category:'XML Suite-XPath-Tests'

    10 !

    11 

    12 

    13 !XPathDOM3DocumentAdaptorTests methodsFor:'initialization & release'!

    14 

    15 createDocumentAdaptor

    16 

    17     | document |

    18     document := XMLv2::Parser forDOM3 processDocumentString:self class bookstore.

    19     ^documentAdaptor := XPathDOM3DocumentAdaptor new document: document.

    20 

    21     "Created: / 20-11-2006 / 21:57:44 / janfrog"

    22 ! !

    23 

    24 !XPathDOM3DocumentAdaptorTests class methodsFor:'documentation'!

    25 

    26 version

    27     ^ '$Header: /opt/data/cvs/stx/goodies/xmlsuite/xpath/XMLv2__XPathDOM3DocumentAdaptorTests.st,v 1.2 2006-12-15 11:06:33 vranyj1 Exp $'

    28 ! !