--- a/AbstractSettingsApplication.st	Tue Dec 18 13:50:54 2018 +0100
+++ b/AbstractSettingsApplication.st	Fri Dec 21 19:18:22 2018 +0100
@@ -878,6 +878,9 @@
     aListOfAspects do:[:eachAspectSymbol |
         (self myAspectFor:eachAspectSymbol) value ~= (anAspectProvider perform:eachAspectSymbol) ifTrue:[
             "/ to debug missing apply-enablements
+            "/ Smalltalk enableBreakPoint:#cg.
+            "/ Smalltalk disableBreakPoint:#cg.
+
             self debuggingCodeFor:#cg is:[
                 Transcript showCR:'settings aspect is different: ',eachAspectSymbol.
                 Transcript showCR:'  here: ',((self myAspectFor:eachAspectSymbol) value) printString.
@@ -889,7 +892,7 @@
     ^ false
 
     "Modified: / 23-03-2011 / 15:45:11 / cg"
-    "Modified (format): / 13-06-2018 / 17:32:32 / Claus Gittinger"
+    "Modified (format): / 21-12-2018 / 14:57:12 / Claus Gittinger"
 !
 
 myAspectFor:aspectSymbol