--- a/Button.st	Sat Jan 27 16:35:46 1996 +0100
+++ b/Button.st	Sat Jan 27 16:37:22 1996 +0100
@@ -1352,19 +1352,19 @@
 
 !Button methodsFor:'focus change'!
 
-showFocus
+showFocus:explicit
     focusLogo notNil ifTrue:[
 	controller enabled ifTrue:[
 	    logo := focusLogo.  
 	    ^ self redisplay
 	]
     ].
-    super showFocus
+    super showFocus:explicit
 
     "Created: 17.9.1995 / 19:58:50 / claus"
 !
 
-showNoFocus
+showNoFocus:explicit
     focusLogo notNil ifTrue:[
 	disabledLogo notNil ifTrue:[
 	    controller enabled ifTrue:[
@@ -1377,7 +1377,7 @@
 	].
 	^ self redisplay
     ].
-    super showNoFocus
+    super showNoFocus:explicit
 
     "Created: 17.9.1995 / 20:00:06 / claus"
     "Modified: 17.9.1995 / 20:26:32 / claus"
@@ -1872,5 +1872,5 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.45 1995-12-17 16:35:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.46 1996-01-27 15:37:06 cg Exp $'
 ! !