--- a/AboutBox.st Sat Apr 02 06:55:28 2016 +0200
+++ b/AboutBox.st Sun Apr 03 07:05:07 2016 +0200
@@ -188,7 +188,7 @@
initialize
"setup the box; change all of my components viewBackground to some darkish grey."
- |dark green lbl graphicsDevice|
+ |dark green lbl|
super initialize.
@@ -196,8 +196,8 @@
green := self class defaultGreen.
dark := Color grey:20.
- (graphicsDevice := self graphicsDevice) hasColors ifFalse:[
- graphicsDevice hasGrayscales ifTrue:[
+ device hasColors ifFalse:[
+ device hasGrayscales ifTrue:[
green := Color brightness:(green brightness).
dark := Color brightness:(dark brightness).
] ifFalse:[