--- a/UserPreferences.st Wed Apr 01 13:26:49 1998 +0200
+++ b/UserPreferences.st Thu Apr 02 10:37:03 1998 +0200
@@ -127,6 +127,35 @@
"Modified: / 1.4.1998 / 13:26:01 / cg"
!
+bracketColor
+ "the color used for brackets;
+ If syntaxColoring is turned on."
+
+ ^ self at:#bracketColor ifAbsentPut:[Color black]
+
+ "
+ self current at:#bracketColor put:Color red.
+ self current at:#bracketEmphasis put:#bold
+ "
+
+ "Created: / 31.3.1998 / 19:11:38 / cg"
+ "Modified: / 1.4.1998 / 13:22:33 / cg"
+!
+
+bracketEmphasis
+ "the emphasis used for brackets;
+ If syntaxColoring is turned on."
+
+ ^ self at:#bracketEmphasis ifAbsentPut:#normal
+
+ "
+ self current at:#bracketEmphasis put:#bold
+ "
+
+ "Created: / 31.3.1998 / 19:11:38 / cg"
+ "Modified: / 1.4.1998 / 13:22:33 / cg"
+!
+
commentColor
"the color used for comments;
If syntaxColoring is turned on."
@@ -393,6 +422,11 @@
^ self at:#unknownIdentifierColor ifAbsentPut:[Color red darkened]
+ "
+ self current at:#unknownIdentifierColor put:Color red.
+ self current at:#unknownIdentifierEmphasis put:#bold
+ "
+
"Created: / 31.3.1998 / 19:11:38 / cg"
"Modified: / 1.4.1998 / 13:22:33 / cg"
!
@@ -410,5 +444,5 @@
!UserPreferences class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.11 1998-04-01 11:26:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.12 1998-04-02 08:37:03 ca Exp $'
! !