diff -r 2a5031cd104b -r 6195b98dafdd ViewWithAcceptAndCancelBar.st
--- a/ViewWithAcceptAndCancelBar.st	Wed Feb 05 19:08:02 2020 +0100
+++ b/ViewWithAcceptAndCancelBar.st	Thu Feb 06 21:25:49 2020 +0100
@@ -17,7 +17,7 @@
 
 SimpleView subclass:#ViewWithAcceptAndCancelBar
 	instanceVariableNames:'slaveView bar reallyModifiedHolder acceptAction cancelAction
-		compareAction'
+		compareAction barShown'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Views-Basic'
@@ -132,15 +132,21 @@
 !ViewWithAcceptAndCancelBar methodsFor:'change & update'!
 
 hideBar
-    bar unmap.
-    bar hiddenOnRealize:true.
-    slaveView origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
+    barShown ifTrue:[
+        bar unmap.
+        bar hiddenOnRealize:true.
+        slaveView origin:(0.0 @ 0.0) corner:(1.0 @ 1.0).
+        barShown := false.
+    ]
 !
 
 showBar
-    slaveView origin:(20 @ 0.0) corner:(1.0 @ 1.0).
-    bar hiddenOnRealize:false.
-    bar realize.
+    barShown ifFalse:[
+        slaveView origin:(20 @ 0.0) corner:(1.0 @ 1.0).
+        bar hiddenOnRealize:false.
+        bar realize.
+        barShown := true.
+    ].
 !
 
 update:something with:aParameter from:changedObject
@@ -188,6 +194,7 @@
     bar := AcceptAndCancelBar in:self.
     bar origin:(0.0 @ 0.0) corner:(20 @ 1.0).
     bar hiddenOnRealize:true.
+    barShown := false.
 
     bar acceptButton action:[ self accept ].
     bar cancelButton action:[ self cancel ].