--- a/UserPreferences.st	Tue Mar 14 14:13:44 2006 +0100
+++ b/UserPreferences.st	Tue Mar 14 17:08:38 2006 +0100
@@ -1133,10 +1133,15 @@
     emp := self at:#emphasisForChangedCode ifAbsent:nil.
     emp isNil ifTrue:[
         emp := #color->Color red darkened.
+        emp := Array with:#bold with:emp.
         "/ emp := #color->Color blue darkened.
         self at:#emphasisForChangedCode put:emp.
     ].
     ^ emp
+
+    "
+     self allInstancesDo:[:pref |pref at:#emphasisForChangedCode put:nil].
+    "
 !
 
 emphasisForDifferentPackage
@@ -1145,9 +1150,14 @@
     emp := self at:#emphasisForDifferentPackage ifAbsent:nil.
     emp isNil ifTrue:[
         emp := #color->Color brown darkened.
+        emp := Array with:#bold with:emp.
         self at:#emphasisForDifferentPackage put:emp.
     ].
     ^ emp
+
+    "
+     self allInstancesDo:[:pref |pref at:#emphasisForDifferentPackage put:nil].
+    "
 !
 
 emphasisForModifiedBuffer
@@ -1156,9 +1166,14 @@
     emp := self at:#emphasisForModifiedBuffer ifAbsent:nil.
     emp isNil ifTrue:[
         emp := #color->Color red darkened.
+        emp := Array with:#bold with:emp.
         self at:#emphasisForModifiedBuffer put:emp.
     ].
     ^ emp
+
+    "
+     self allInstancesDo:[:pref |pref at:#emphasisForModifiedBuffer put:nil].
+    "
 !
 
 emphasisForObsoleteCode
@@ -1167,9 +1182,14 @@
     emp := self at:#emphasisForObsoleteCode ifAbsent:nil.
     emp isNil ifTrue:[
         emp := #color->Color red.
+        emp := Array with:#bold with:emp.
         self at:#emphasisForObsoleteCode put:emp.
     ].
     ^ emp
+
+    "
+     self allInstancesDo:[:pref |pref at:#emphasisForObsoleteCode put:nil].
+    "
 !
 
 emphasisForReadVariable
@@ -2451,5 +2471,5 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.161 2006-02-21 20:25:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.162 2006-03-14 16:08:38 cg Exp $'
 ! !