TagBrush from CSS selector w/o jQuery.

src/Web.js

@@ -3518,6 +3518,32 @@ messageSends: ["at:put:"]
 }),
 $globals.TagBrush);
 
+$core.addMethod(
+$core.method({
+selector: "initializeFromCssSelector:canvas:",
+protocol: "initialization",
+fn: function (aString,aCanvas){
+var self=this,$self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+$self.element=$recv(document)._querySelector_(aString);
+$self.canvas=aCanvas;
+return self;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"initializeFromCssSelector:canvas:",{aString:aString,aCanvas:aCanvas})});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: ["aString", "aCanvas"],
+source: "initializeFromCssSelector: aString canvas: aCanvas\x0a\x09element := document querySelector: aString.\x0a\x09canvas := aCanvas",
+referencedClasses: [],
+//>>excludeEnd("ide");
+pragmas: [],
+messageSends: ["querySelector:"]
+}),
+$globals.TagBrush);
+
 $core.addMethod(
 $core.method({
 selector: "initializeFromJQuery:canvas:",
@@ -4521,6 +4547,57 @@ messageSends: ["append:"]
 $globals.TagBrush);
 
 
+$core.addMethod(
+$core.method({
+selector: "fromCssSelector:",
+protocol: "instance creation",
+fn: function (aString){
+var self=this,$self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+return $self._fromCssSelector_canvas_(aString,$recv($globals.HTMLCanvas)._new());
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"fromCssSelector:",{aString:aString})});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: ["aString"],
+source: "fromCssSelector: aString\x0a\x09^ self fromCssSelector: aString canvas: HTMLCanvas new",
+referencedClasses: ["HTMLCanvas"],
+//>>excludeEnd("ide");
+pragmas: [],
+messageSends: ["fromCssSelector:canvas:", "new"]
+}),
+$globals.TagBrush.a$cls);
+
+$core.addMethod(
+$core.method({
+selector: "fromCssSelector:canvas:",
+protocol: "instance creation",
+fn: function (aString,aCanvas){
+var self=this,$self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+var $1;
+$1=$self._new();
+$recv($1)._initializeFromCssSelector_canvas_(aString,aCanvas);
+return $recv($1)._yourself();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"fromCssSelector:canvas:",{aString:aString,aCanvas:aCanvas})});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: ["aString", "aCanvas"],
+source: "fromCssSelector: aString canvas: aCanvas\x0a\x09^ self new\x0a\x09\x09initializeFromCssSelector: aString canvas: aCanvas;\x0a\x09\x09yourself",
+referencedClasses: [],
+//>>excludeEnd("ide");
+pragmas: [],
+messageSends: ["initializeFromCssSelector:canvas:", "new", "yourself"]
+}),
+$globals.TagBrush.a$cls);
+
 $core.addMethod(
 $core.method({
 selector: "fromJQuery:",
@@ -4964,4 +5041,28 @@ messageSends: ["append:"]
 }),
 $globals.String);
 
+$core.addMethod(
+$core.method({
+selector: "asBrush",
+protocol: "*Web",
+fn: function (){
+var self=this,$self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+return $recv($globals.TagBrush)._fromCssSelector_(self);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"asBrush",{})});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: [],
+source: "asBrush\x0a\x09^ TagBrush fromCssSelector: self",
+referencedClasses: ["TagBrush"],
+//>>excludeEnd("ide");
+pragmas: [],
+messageSends: ["fromCssSelector:"]
+}),
+$globals.String);
+
 });

src/Web.st

@@ -828,6 +828,11 @@ onUnload: aBlock
 
 !TagBrush methodsFor: 'initialization'!
 
+initializeFromCssSelector: aString canvas: aCanvas
+	element := document querySelector: aString.
+	canvas := aCanvas
+!
+
 initializeFromJQuery: aJQuery canvas: aCanvas
 	element := aJQuery get: 0.
 	canvas := aCanvas
@@ -840,6 +845,16 @@ initializeFromString: aString canvas: aCanvas
 
 !TagBrush class methodsFor: 'instance creation'!
 
+fromCssSelector: aString
+	^ self fromCssSelector: aString canvas: HTMLCanvas new
+!
+
+fromCssSelector: aString canvas: aCanvas
+	^ self new
+		initializeFromCssSelector: aString canvas: aCanvas;
+		yourself
+!
+
 fromJQuery: aJQuery
 	^ self fromJQuery: aJQuery canvas: HTMLCanvas new
 !
@@ -950,5 +965,9 @@ appendToBrush: aTagBrush
 
 appendToJQuery: aJQuery
 	aJQuery append: self
+!
+
+asBrush
+	^ TagBrush fromCssSelector: self
 ! !