|
@@ -72,6 +72,7 @@ args: ["aDomite"],
|
|
|
source: "= aDomite\x0a\x09^ self class = aDomite class and: [\x0a\x09\x09self element = aDomite element and: [\x0a\x09\x09\x09self reference = aDomite reference ]]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["and:", "=", "class", "element", "reference"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -95,6 +96,7 @@ args: ["aString"],
|
|
|
source: "allAt: aString\x0a\x09^ self class wrap: (PlatformDom toArray: (self element querySelectorAll: aString))",
|
|
|
referencedClasses: ["PlatformDom"],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["wrap:", "class", "toArray:", "querySelectorAll:", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -113,6 +115,7 @@ args: [],
|
|
|
source: "asDomNode\x0a\x09^ element",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -136,6 +139,7 @@ args: [],
|
|
|
source: "asJQuery\x0a\x09^ self asDomNode asJQuery",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["asJQuery", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -159,6 +163,7 @@ args: ["aString"],
|
|
|
source: "at: aString\x0a\x09^ self class fromElement: (self element querySelector: aString)",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fromElement:", "class", "querySelector:", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -182,6 +187,7 @@ args: [],
|
|
|
source: "atEnd\x0a\x09^ self reference isNil",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["isNil", "reference"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -205,6 +211,7 @@ args: [],
|
|
|
source: "atStart\x0a\x09^ self reference = self element firstChild",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["=", "reference", "firstChild", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -235,6 +242,7 @@ args: ["aString"],
|
|
|
source: "attrAt: aString\x0a\x09(element hasAttribute: aString)\x0a\x09\x09ifTrue: [ ^ element getAttribute: aString ]\x0a\x09\x09ifFalse: [ ^ nil ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifTrue:ifFalse:", "hasAttribute:", "getAttribute:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -259,6 +267,7 @@ args: ["aString", "anotherString"],
|
|
|
source: "attrAt: aString put: anotherString\x0a\x09element setAttribute: aString to: anotherString",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["setAttribute:to:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -290,6 +299,7 @@ args: [],
|
|
|
source: "back\x0a\x09self atStart\x0a\x09\x09ifTrue: [ ^ nil ]\x0a\x09\x09ifFalse: [ self setToBack. ^ self peek ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifTrue:ifFalse:", "atStart", "setToBack", "peek"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -313,6 +323,7 @@ args: [],
|
|
|
source: "canSetToUpperLevel\x0a\x09^ self element parentNode notNil",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["notNil", "parentNode", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -348,6 +359,7 @@ args: ["aDomite"],
|
|
|
source: "cutUpTo: aDomite\x0a<inlineJS: '\x0a\x09var result = document.createDocumentFragment(),\x0a\x09\x09start = $self.reference,\x0a\x09\x09end = aDomite.reference,\x0a\x09\x09tmp;\x0a\x09while (start && start != end) {\x0a\x09\x09tmp = start;\x0a\x09\x09start = start.nextSibling;\x0a\x09\x09result.appendChild(tmp);\x0a\x09}\x0a\x09$self.reference = start;\x0a\x09return $self._class()._fromElement_(result);\x0a'>",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [["inlineJS:", ["\x0a\x09var result = document.createDocumentFragment(),\x0a\x09\x09start = $self.reference,\x0a\x09\x09end = aDomite.reference,\x0a\x09\x09tmp;\x0a\x09while (start && start != end) {\x0a\x09\x09tmp = start;\x0a\x09\x09start = start.nextSibling;\x0a\x09\x09result.appendChild(tmp);\x0a\x09}\x0a\x09$self.reference = start;\x0a\x09return $self._class()._fromElement_(result);\x0a"]]],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -366,6 +378,7 @@ args: [],
|
|
|
source: "element\x0a\x09^ element",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -385,6 +398,7 @@ args: ["anObject"],
|
|
|
source: "element: anObject\x0a\x09element := anObject",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -409,6 +423,7 @@ args: ["aString"],
|
|
|
source: "fire: aString\x0a\x09self fire: aString detail: nil asJavaScriptObject",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fire:detail:", "asJavaScriptObject"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -433,6 +448,7 @@ args: ["aString", "anObject"],
|
|
|
source: "fire: aString detail: anObject\x0a\x09self fireEvent: (\x0a\x09\x09PlatformDom newCustomEvent: aString detail: anObject)",
|
|
|
referencedClasses: ["PlatformDom"],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fireEvent:", "newCustomEvent:detail:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -457,6 +473,7 @@ args: ["anEvent"],
|
|
|
source: "fireEvent: anEvent\x0a\x09self asDomNode dispatchEvent: anEvent",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["dispatchEvent:", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -490,6 +507,7 @@ args: [],
|
|
|
source: "initialize\x0a\x09super initialize.\x0a\x09element := document body.\x0a\x09reference := nil asJavaScriptObject",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["initialize", "body", "asJavaScriptObject"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -513,6 +531,7 @@ args: [],
|
|
|
source: "isInvalid\x0a\x09^ self element isNil",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["isNil", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -546,6 +565,7 @@ args: [],
|
|
|
source: "next\x0a\x09self atEnd\x0a\x09\x09ifTrue: [ ^ nil ]\x0a\x09\x09ifFalse: [ | result |\x0a\x09\x09\x09result := self peek.\x0a\x09\x09\x09self setToNext.\x0a\x09\x09\x09^ result ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifTrue:ifFalse:", "atEnd", "peek", "setToNext"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -570,6 +590,7 @@ args: ["anObject"],
|
|
|
source: "nextPut: anObject\x0a\x09self nextPutString: anObject printString",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["nextPutString:", "printString"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -594,6 +615,7 @@ args: ["aDomElement"],
|
|
|
source: "nextPutDomNode: aDomElement\x0a\x09self element\x0a\x09\x09insertBefore: aDomElement\x0a\x09\x09reference: self reference",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["insertBefore:reference:", "element", "reference"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -624,6 +646,7 @@ args: ["aJSObject"],
|
|
|
source: "nextPutJSObject: aJSObject\x0a\x09(PlatformDom isDomNode: aJSObject)\x0a\x09\x09ifTrue: [ self nextPutDomNode: aJSObject ]\x0a\x09\x09ifFalse: [ self nextPut: aJSObject ]",
|
|
|
referencedClasses: ["PlatformDom"],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifTrue:ifFalse:", "isDomNode:", "nextPutDomNode:", "nextPut:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -648,6 +671,7 @@ args: ["aString"],
|
|
|
source: "nextPutString: aString\x0a\x09self nextPutDomNode: aString asString asDomNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["nextPutDomNode:", "asDomNode", "asString"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -672,6 +696,7 @@ args: ["aString", "aBlock"],
|
|
|
source: "off: aString unbind: aBlock\x0a\x09self asDomNode removeEventListener: aString block: aBlock useCapture: false",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["removeEventListener:block:useCapture:", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -696,6 +721,7 @@ args: ["aString", "aBlock"],
|
|
|
source: "on: aString bind: aBlock\x0a\x09self asDomNode addEventListener: aString block: aBlock useCapture: false",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["addEventListener:block:useCapture:", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -727,6 +753,7 @@ args: [],
|
|
|
source: "peek\x0a\x09^ self reference\x0a\x09\x09ifNotNil: [ :ref | self class fromElement: ref ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifNotNil:", "reference", "fromElement:", "class"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -751,6 +778,7 @@ args: [],
|
|
|
source: "prev\x0a\x09self deprecatedAPI: 'Use #back instead.'.\x0a\x09^ self back",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["deprecatedAPI:", "back"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -774,6 +802,7 @@ args: ["aString"],
|
|
|
source: "propAt: aString\x0a\x09^ element at: aString",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["at:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -797,6 +826,7 @@ args: ["aString", "anObject"],
|
|
|
source: "propAt: aString put: anObject\x0a\x09^ element at: aString put: anObject",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["at:put:"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -821,6 +851,7 @@ args: ["aStream"],
|
|
|
source: "putOn: aStream\x0a\x09aStream nextPutDomNode: self asDomNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["nextPutDomNode:", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -839,6 +870,7 @@ args: [],
|
|
|
source: "reference\x0a\x09^ reference",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -858,6 +890,7 @@ args: ["anObject"],
|
|
|
source: "reference: anObject\x0a\x09reference := anObject",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -882,6 +915,7 @@ args: [],
|
|
|
source: "reset\x0a\x09self reference: self element firstChild",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["reference:", "firstChild", "element"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -909,6 +943,7 @@ args: [],
|
|
|
source: "resetContents\x0a<inlineJS: '\x0a\x09var element = $self.element, child;\x0a\x09while (child = element.firstChild) element.removeChild(child);\x0a\x09$self.reference = null;\x0a'>",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [["inlineJS:", ["\x0a\x09var element = $self.element, child;\x0a\x09while (child = element.firstChild) element.removeChild(child);\x0a\x09$self.reference = null;\x0a"]]],
|
|
|
messageSends: []
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -940,6 +975,7 @@ args: [],
|
|
|
source: "setToAfter\x0a\x09self\x0a\x09\x09reference: self element nextSibling;\x0a\x09\x09element: self element parentNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["reference:", "nextSibling", "element", "element:", "parentNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -976,6 +1012,7 @@ args: [],
|
|
|
source: "setToBack\x0a\x09self atStart ifFalse: [\x0a\x09\x09self reference: (self reference\x0a\x09\x09\x09ifNil: [ self element lastChild ]\x0a\x09\x09\x09ifNotNil: [ :ref | ref previousSibling ])]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifFalse:", "atStart", "reference:", "ifNil:ifNotNil:", "reference", "lastChild", "element", "previousSibling"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -1006,6 +1043,7 @@ args: [],
|
|
|
source: "setToBefore\x0a\x09self\x0a\x09\x09reference: self element;\x0a\x09\x09element: self element parentNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["reference:", "element", "element:", "parentNode"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -1030,6 +1068,7 @@ args: [],
|
|
|
source: "setToEnd\x0a\x09self reference: nil asJavaScriptObject \x22null\x22",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["reference:", "asJavaScriptObject"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -1058,6 +1097,7 @@ args: [],
|
|
|
source: "setToNext\x0a\x09self atEnd ifFalse: [\x0a\x09\x09self reference: self reference nextSibling ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifFalse:", "atEnd", "reference:", "nextSibling", "reference"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -1082,6 +1122,7 @@ args: [],
|
|
|
source: "setToPrev\x0a\x09self deprecatedAPI: 'Use #setToBack instead'.\x0a\x09^ self setToBack",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["deprecatedAPI:", "setToBack"]
|
|
|
}),
|
|
|
$globals.Domite);
|
|
@@ -1106,6 +1147,7 @@ args: ["aString"],
|
|
|
source: "allAt: aString\x0a\x09^ self wrap: (PlatformDom toArray: (document querySelectorAll: aString))",
|
|
|
referencedClasses: ["PlatformDom"],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["wrap:", "toArray:", "querySelectorAll:"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1129,6 +1171,7 @@ args: ["aString"],
|
|
|
source: "at: aString\x0a\x09^ self fromElement: (document querySelector: aString)",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fromElement:", "querySelector:"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1163,6 +1206,7 @@ args: ["aDomElement"],
|
|
|
source: "fromElement: aDomElement\x0a\x09aDomElement ifNotNil: [\x0a\x09\x09(PlatformDom isDomNode: aDomElement) ifFalse: [\x0a\x09\x09\x09self error: self name, ': Need a DOM node' ]].\x0a\x09^ self new\x0a\x09\x09element: aDomElement;\x0a\x09\x09yourself",
|
|
|
referencedClasses: ["PlatformDom"],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["ifNotNil:", "ifFalse:", "isDomNode:", "error:", ",", "name", "element:", "new", "yourself"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1189,6 +1233,7 @@ args: ["aDomElement", "anotherDomElement"],
|
|
|
source: "fromElement: aDomElement cursorBefore: anotherDomElement\x0a\x09^ (self fromElement: aDomElement)\x0a\x09\x09reference: anotherDomElement;\x0a\x09\x09yourself",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["reference:", "fromElement:", "yourself"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1212,6 +1257,7 @@ args: ["aString"],
|
|
|
source: "newElement: aString\x0a\x09^ self fromElement: (document createElement: aString)",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fromElement:", "createElement:"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1235,6 +1281,7 @@ args: ["aString", "anotherString"],
|
|
|
source: "newElement: aString xmlns: anotherString \x0a\x0a\x09^ self fromElement: (document createElementNS: anotherString tagName: aString)",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fromElement:", "createElementNS:tagName:"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1258,6 +1305,7 @@ args: [],
|
|
|
source: "newStream\x0a\x09^ self fromElement: #() asDomNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["fromElement:", "asDomNode"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1289,6 +1337,7 @@ args: ["aCollection"],
|
|
|
source: "wrap: aCollection\x0a\x09^ aCollection collect: [ :each | self fromElement: each ]",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["collect:", "fromElement:"]
|
|
|
}),
|
|
|
$globals.Domite.a$cls);
|
|
@@ -1313,6 +1362,7 @@ args: ["aNode"],
|
|
|
source: "nextPutDomNode: aNode\x0a\x09self nextPut: aNode",
|
|
|
referencedClasses: [],
|
|
|
|
|
|
+pragmas: [],
|
|
|
messageSends: ["nextPut:"]
|
|
|
}),
|
|
|
$globals.ProtoStream);
|