When installing a VariableBreakpoint, we need to announce it to updat…

…e the browser. - remove metalink announcing option, we do not need that anymore now that we announce on the level of the breakpoint - cleanup the old BreakpointNotification hierachy, not need to keep them around.
VincentBlondeau · Nov 4, 2020 · 5556321 · 5556321
1 parent 4ee701e
commit 5556321
Show file tree

Hide file tree

Showing 6 changed files with 2 additions and 95 deletions.
diff --git a/src/Reflectivity/Breakpoint.class.st b/src/Reflectivity/Breakpoint.class.st
@@ -258,7 +258,7 @@ Breakpoint >> enable [
 Breakpoint >> initialize [
 
 	self class initializeSlots: self.
-	options := #(+ optionCompileOnLinkInstallation + optionAnnounce - optionStyler)
+	options := #(+ optionCompileOnLinkInstallation - optionStyler)
 ]
 
 { #category : #install }

diff --git a/src/Reflectivity/BreakpointAddedNotification.class.st b/src/Reflectivity/BreakpointAddedNotification.class.st
diff --git a/src/Reflectivity/BreakpointHitNotification.class.st b/src/Reflectivity/BreakpointHitNotification.class.st
diff --git a/src/Reflectivity/BreakpointNotification.class.st b/src/Reflectivity/BreakpointNotification.class.st
diff --git a/src/Reflectivity/BreakpointRemovedNotification.class.st b/src/Reflectivity/BreakpointRemovedNotification.class.st
diff --git a/src/Reflectivity/VariableBreakpoint.class.st b/src/Reflectivity/VariableBreakpoint.class.st
@@ -163,8 +163,8 @@ VariableBreakpoint >> install [
 				toVariableNamed: vName
 				option: self accessStrategy ].
 	isInstalled := true.
+	self setAsNodeProperty.
 	self class addBreakpoint: self.
-	self setAsNodeProperty 
 ]
 
 { #category : #testing }