Extract onEvent:do:.

src/Web.js

@@ -3703,7 +3703,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("blur",aBlock);
+$self._onEvent_do_("blur",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onBlur:",{aBlock:aBlock})});
@@ -3711,11 +3711,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onBlur: aBlock\x0a\x09self asJQuery bind: 'blur' do: aBlock",
+source: "onBlur: aBlock\x0a\x09self onEvent: 'blur' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3728,7 +3728,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("change",aBlock);
+$self._onEvent_do_("change",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onChange:",{aBlock:aBlock})});
@@ -3736,11 +3736,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onChange: aBlock\x0a\x09self asJQuery bind: 'change' do: aBlock",
+source: "onChange: aBlock\x0a\x09self onEvent: 'change' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3753,7 +3753,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("click",aBlock);
+$self._onEvent_do_("click",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onClick:",{aBlock:aBlock})});
@@ -3761,11 +3761,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onClick: aBlock\x0a\x09self asJQuery bind: 'click' do: aBlock",
+source: "onClick: aBlock\x0a\x09self onEvent: 'click' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3778,7 +3778,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("dblclick",aBlock);
+$self._onEvent_do_("dblclick",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onDblClick:",{aBlock:aBlock})});
@@ -3786,7 +3786,32 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onDblClick: aBlock\x0a\x09self asJQuery bind: 'dblclick' do: aBlock",
+source: "onDblClick: aBlock\x0a\x09self onEvent: 'dblclick' do: aBlock",
+referencedClasses: [],
+//>>excludeEnd("ide");
+pragmas: [],
+messageSends: ["onEvent:do:"]
+}),
+$globals.TagBrush);
+
+$core.addMethod(
+$core.method({
+selector: "onEvent:do:",
+protocol: "events",
+fn: function (aString,aBlock){
+var self=this,$self=this;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+$recv($self._asJQuery())._bind_do_(aString,aBlock);
+return self;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"onEvent:do:",{aString:aString,aBlock:aBlock})});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: ["aString", "aBlock"],
+source: "onEvent: aString do: aBlock\x0a\x09self asJQuery bind: aString do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
@@ -3803,7 +3828,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("focus",aBlock);
+$self._onEvent_do_("focus",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onFocus:",{aBlock:aBlock})});
@@ -3811,11 +3836,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onFocus: aBlock\x0a\x09self asJQuery bind: 'focus' do: aBlock",
+source: "onFocus: aBlock\x0a\x09self onEvent: 'focus' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3828,7 +3853,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("focusin",aBlock);
+$self._onEvent_do_("focusin",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onFocusIn:",{aBlock:aBlock})});
@@ -3836,11 +3861,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onFocusIn: aBlock\x0a\x09self asJQuery bind: 'focusin' do: aBlock",
+source: "onFocusIn: aBlock\x0a\x09self onEvent: 'focusin' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3853,7 +3878,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("focusout",aBlock);
+$self._onEvent_do_("focusout",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onFocusOut:",{aBlock:aBlock})});
@@ -3861,11 +3886,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onFocusOut: aBlock\x0a\x09self asJQuery bind: 'focusout' do: aBlock",
+source: "onFocusOut: aBlock\x0a\x09self onEvent: 'focusout' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3878,7 +3903,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("hover",aBlock);
+$self._onEvent_do_("hover",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onHover:",{aBlock:aBlock})});
@@ -3886,11 +3911,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onHover: aBlock\x0a\x09self asJQuery bind: 'hover' do: aBlock",
+source: "onHover: aBlock\x0a\x09self onEvent: 'hover' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3903,7 +3928,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("keydown",aBlock);
+$self._onEvent_do_("keydown",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onKeyDown:",{aBlock:aBlock})});
@@ -3911,11 +3936,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onKeyDown: aBlock\x0a\x09self asJQuery bind: 'keydown' do: aBlock",
+source: "onKeyDown: aBlock\x0a\x09self onEvent: 'keydown' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3928,7 +3953,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("keypress",aBlock);
+$self._onEvent_do_("keypress",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onKeyPress:",{aBlock:aBlock})});
@@ -3936,11 +3961,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onKeyPress: aBlock\x0a\x09self asJQuery bind: 'keypress' do: aBlock",
+source: "onKeyPress: aBlock\x0a\x09self onEvent: 'keypress' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3953,7 +3978,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("keyup",aBlock);
+$self._onEvent_do_("keyup",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onKeyUp:",{aBlock:aBlock})});
@@ -3961,11 +3986,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onKeyUp: aBlock\x0a\x09self asJQuery bind: 'keyup' do: aBlock",
+source: "onKeyUp: aBlock\x0a\x09self onEvent: 'keyup' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -3978,7 +4003,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mousedown",aBlock);
+$self._onEvent_do_("mousedown",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseDown:",{aBlock:aBlock})});
@@ -3986,11 +4011,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseDown: aBlock\x0a\x09self asJQuery bind: 'mousedown' do: aBlock",
+source: "onMouseDown: aBlock\x0a\x09self onEvent: 'mousedown' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4003,7 +4028,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mouseenter",aBlock);
+$self._onEvent_do_("mouseenter",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseEnter:",{aBlock:aBlock})});
@@ -4011,11 +4036,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseEnter: aBlock\x0a\x09self asJQuery bind: 'mouseenter' do: aBlock",
+source: "onMouseEnter: aBlock\x0a\x09self onEvent: 'mouseenter' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4028,7 +4053,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mouseleave",aBlock);
+$self._onEvent_do_("mouseleave",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseLeave:",{aBlock:aBlock})});
@@ -4036,11 +4061,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseLeave: aBlock\x0a\x09self asJQuery bind: 'mouseleave' do: aBlock",
+source: "onMouseLeave: aBlock\x0a\x09self onEvent: 'mouseleave' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4053,7 +4078,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mousemove",aBlock);
+$self._onEvent_do_("mousemove",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseMove:",{aBlock:aBlock})});
@@ -4061,11 +4086,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseMove: aBlock\x0a\x09self asJQuery bind: 'mousemove' do: aBlock",
+source: "onMouseMove: aBlock\x0a\x09self onEvent: 'mousemove' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4078,7 +4103,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mouseout",aBlock);
+$self._onEvent_do_("mouseout",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseOut:",{aBlock:aBlock})});
@@ -4086,11 +4111,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseOut: aBlock\x0a\x09self asJQuery bind: 'mouseout' do: aBlock",
+source: "onMouseOut: aBlock\x0a\x09self onEvent: 'mouseout' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4103,7 +4128,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mouseover",aBlock);
+$self._onEvent_do_("mouseover",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseOver:",{aBlock:aBlock})});
@@ -4111,11 +4136,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseOver: aBlock\x0a\x09self asJQuery bind: 'mouseover' do: aBlock",
+source: "onMouseOver: aBlock\x0a\x09self onEvent: 'mouseover' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4128,7 +4153,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("mouseup",aBlock);
+$self._onEvent_do_("mouseup",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onMouseUp:",{aBlock:aBlock})});
@@ -4136,11 +4161,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onMouseUp: aBlock\x0a\x09self asJQuery bind: 'mouseup' do: aBlock",
+source: "onMouseUp: aBlock\x0a\x09self onEvent: 'mouseup' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4153,7 +4178,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("select",aBlock);
+$self._onEvent_do_("select",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onSelect:",{aBlock:aBlock})});
@@ -4161,11 +4186,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onSelect: aBlock\x0a\x09self asJQuery bind: 'select' do: aBlock",
+source: "onSelect: aBlock\x0a\x09self onEvent: 'select' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4178,7 +4203,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("submit",aBlock);
+$self._onEvent_do_("submit",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onSubmit:",{aBlock:aBlock})});
@@ -4186,11 +4211,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onSubmit: aBlock\x0a\x09self asJQuery bind: 'submit' do: aBlock",
+source: "onSubmit: aBlock\x0a\x09self onEvent: 'submit' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 
@@ -4203,7 +4228,7 @@ var self=this,$self=this;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-$recv($self._asJQuery())._bind_do_("unload",aBlock);
+$self._onEvent_do_("unload",aBlock);
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"onUnload:",{aBlock:aBlock})});
@@ -4211,11 +4236,11 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: ["aBlock"],
-source: "onUnload: aBlock\x0a\x09self asJQuery bind: 'unload' do: aBlock",
+source: "onUnload: aBlock\x0a\x09self onEvent: 'unload' do: aBlock",
 referencedClasses: [],
 //>>excludeEnd("ide");
 pragmas: [],
-messageSends: ["bind:do:", "asJQuery"]
+messageSends: ["onEvent:do:"]
 }),
 $globals.TagBrush);
 

src/Web.st

@@ -742,87 +742,91 @@ asJQueryInContext: aContext
 !TagBrush methodsFor: 'events'!
 
 onBlur: aBlock
-	self asJQuery bind: 'blur' do: aBlock
+	self onEvent: 'blur' do: aBlock
 !
 
 onChange: aBlock
-	self asJQuery bind: 'change' do: aBlock
+	self onEvent: 'change' do: aBlock
 !
 
 onClick: aBlock
-	self asJQuery bind: 'click' do: aBlock
+	self onEvent: 'click' do: aBlock
 !
 
 onDblClick: aBlock
-	self asJQuery bind: 'dblclick' do: aBlock
+	self onEvent: 'dblclick' do: aBlock
+!
+
+onEvent: aString do: aBlock
+	self asJQuery bind: aString do: aBlock
 !
 
 onFocus: aBlock
-	self asJQuery bind: 'focus' do: aBlock
+	self onEvent: 'focus' do: aBlock
 !
 
 onFocusIn: aBlock
-	self asJQuery bind: 'focusin' do: aBlock
+	self onEvent: 'focusin' do: aBlock
 !
 
 onFocusOut: aBlock
-	self asJQuery bind: 'focusout' do: aBlock
+	self onEvent: 'focusout' do: aBlock
 !
 
 onHover: aBlock
-	self asJQuery bind: 'hover' do: aBlock
+	self onEvent: 'hover' do: aBlock
 !
 
 onKeyDown: aBlock
-	self asJQuery bind: 'keydown' do: aBlock
+	self onEvent: 'keydown' do: aBlock
 !
 
 onKeyPress: aBlock
-	self asJQuery bind: 'keypress' do: aBlock
+	self onEvent: 'keypress' do: aBlock
 !
 
 onKeyUp: aBlock
-	self asJQuery bind: 'keyup' do: aBlock
+	self onEvent: 'keyup' do: aBlock
 !
 
 onMouseDown: aBlock
-	self asJQuery bind: 'mousedown' do: aBlock
+	self onEvent: 'mousedown' do: aBlock
 !
 
 onMouseEnter: aBlock
-	self asJQuery bind: 'mouseenter' do: aBlock
+	self onEvent: 'mouseenter' do: aBlock
 !
 
 onMouseLeave: aBlock
-	self asJQuery bind: 'mouseleave' do: aBlock
+	self onEvent: 'mouseleave' do: aBlock
 !
 
 onMouseMove: aBlock
-	self asJQuery bind: 'mousemove' do: aBlock
+	self onEvent: 'mousemove' do: aBlock
 !
 
 onMouseOut: aBlock
-	self asJQuery bind: 'mouseout' do: aBlock
+	self onEvent: 'mouseout' do: aBlock
 !
 
 onMouseOver: aBlock
-	self asJQuery bind: 'mouseover' do: aBlock
+	self onEvent: 'mouseover' do: aBlock
 !
 
 onMouseUp: aBlock
-	self asJQuery bind: 'mouseup' do: aBlock
+	self onEvent: 'mouseup' do: aBlock
 !
 
 onSelect: aBlock
-	self asJQuery bind: 'select' do: aBlock
+	self onEvent: 'select' do: aBlock
 !
 
 onSubmit: aBlock
-	self asJQuery bind: 'submit' do: aBlock
+	self onEvent: 'submit' do: aBlock
 !
 
 onUnload: aBlock
-	self asJQuery bind: 'unload' do: aBlock
+	self onEvent: 'unload' do: aBlock
 ! !
 
 !TagBrush methodsFor: 'initialization'!