SCXMLElementWrapper

• attributeAt:
• elements

• initializeFromXMLElement:

• allElements
• elementWithId:
• elementWithId:ifNone:
• elementsWithClass:
• xmlElement

• allElementsIn:addTo:
• allElementsWithTag:in:addTo:
• elementWithId:containsText:
• xmlElement:containsText:

• containsText:

• fromXMLElement:

inferredType:

UndefinedObject

	^xmlElement attributeAt: name

	^xmlElement elements

	xmlElement _ anElement

	| result |
	result _ OrderedCollection new.
	self allElementsIn: xmlElement addTo: result.
	^ result

	^ self elementWithId: aString ifNone: [self error: 'No such element.']

 
	^self allElements
		detect: [:each | (each
				attributeAt: 'id'
				ifAbsent: [])
				= aString]
		ifNone: aBlock

 
	^ self allElements
		select: [:each | (each
				attributeAt: 'class'
				ifAbsent: [])
				= aString]

	^xmlElement

 
	result add: element.
	element
		elementsDo: [:subElement | self allElementsIn: subElement addTo: result]

 
	element name = tagName 
		ifTrue: [result add: element]
		ifFalse: 
			[element elementsDo: 
					[:subElement | 
					self 
						allElementsWithTag: tagName
						in: subElement
						addTo: result]]

 
	^self xmlElement: (self elementWithId: id) containsText: aString

 
	^ (element contents
			anySatisfy: [:each | each isText and: [each string includesSubstring: aString caseSensitive: true]])
		or: [element elements
				anySatisfy: [:e | self xmlElement: e containsText: aString]]

 
	^self xmlElement: xmlElement containsText: aString

	^ self new initializeFromXMLElement: anElement