-
Notifications
You must be signed in to change notification settings - Fork 0
/
DocumentType.cljs
152 lines (111 loc) · 3.6 KB
/
DocumentType.cljs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
(ns web.DocumentType
"The DocumentType interface represents a `web.Node` containing
doctype."
(:refer-clojure :exclude [name remove]))
(defn remove
"Method.
The ChildNode.remove() method removes the object from the tree
belongs to.
`node.remove();`
See also: `https://developer.mozilla.org/en-US/docs/Web/API/ChildNode/remove`"
[this ]
(-> this (.remove)))
(defn after
"Method.
The ChildNode.after() method inserts a set of `web.Node` or `web.dom.DOMString`
in the children list of this ChildNode's parent, just after this
`web.dom.DOMString` objects are inserted as equivalent `web.Text`
`[Throws, Unscopable]
void ChildNode.after((Node or DOMString)... nodes);`
See also: `https://developer.mozilla.org/en-US/docs/Web/API/ChildNode/after`"
[this & args]
(-> this .-after (.apply this (clj->js args))))
(defn before
"Method.
The ChildNode.before() method inserts a set of `web.Node` or
objects in the children list of this ChildNode's parent, just
this ChildNode. `web.dom.DOMString` objects are inserted as equivalent
nodes.
`[Throws, Unscopable]
void ChildNode.before((Node or DOMString)... nodes);`
See also: `https://developer.mozilla.org/en-US/docs/Web/API/ChildNode/before`"
[this & args]
(-> this .-before (.apply this (clj->js args))))
(defn replace-with
"Method.
The ChildNode.replaceWith() method replaces this ChildNode in
children list of its parent with a set of `web.Node` or `web.dom.DOMString`
`web.dom.DOMString` objects are inserted as equivalent `web.Text`
`[Throws, Unscopable]
void ChildNode.replaceWith((Node or DOMString)... nodes);`
See also: `https://developer.mozilla.org/en-US/docs/Web/API/ChildNode/replaceWith`"
[this & args]
(-> this .-replaceWith (.apply this (clj->js args))))
(defn entities
"Property.
A NamedNodeMap of entities declared in the DTD. Every node in
map implements the Entity interface."
[this]
(-> this (.-entities)))
(defn set-entities!
"Property.
A NamedNodeMap of entities declared in the DTD. Every node in
map implements the Entity interface."
[this val]
(aset this "entities" val))
(defn internal-subset
"Property.
A DOMString of the internal subset, or null if there is none.
\"<!ELEMENT foo (bar)>\"."
[this]
(-> this (.-internalSubset)))
(defn set-internal-subset!
"Property.
A DOMString of the internal subset, or null if there is none.
\"<!ELEMENT foo (bar)>\"."
[this val]
(aset this "internalSubset" val))
(defn name
"Property.
A DOMString, eg \"html\" for <!DOCTYPE HTML>."
[this]
(-> this (.-name)))
(defn set-name!
"Property.
A DOMString, eg \"html\" for <!DOCTYPE HTML>."
[this val]
(aset this "name" val))
(defn notations
"Property.
A NamedNodeMap with notations declared in the DTD. Every node
this map implements the Notation interface."
[this]
(-> this (.-notations)))
(defn set-notations!
"Property.
A NamedNodeMap with notations declared in the DTD. Every node
this map implements the Notation interface."
[this val]
(aset this "notations" val))
(defn public-id
"Property.
A DOMString, eg \"-//W3C//DTD HTML 4.01//EN\", empty string for"
[this]
(-> this (.-publicId)))
(defn set-public-id!
"Property.
A DOMString, eg \"-//W3C//DTD HTML 4.01//EN\", empty string for"
[this val]
(aset this "publicId" val))
(defn system-id
"Property.
A DOMString, eg \"http://www.w3.org/TR/html4/strict.dtd\", empty
for HTML5."
[this]
(-> this (.-systemId)))
(defn set-system-id!
"Property.
A DOMString, eg \"http://www.w3.org/TR/html4/strict.dtd\", empty
for HTML5."
[this val]
(aset this "systemId" val))