--- a/ViewWithAcceptAndCancelBar.st	Mon May 16 23:56:06 2016 +0200
+++ b/ViewWithAcceptAndCancelBar.st	Mon May 16 23:57:01 2016 +0200
@@ -260,7 +260,7 @@
 !ViewWithAcceptAndCancelBar::AcceptAndCancelBar methodsFor:'initialization'!
 
 initialize
-    |acceptColor cancelColor compareColor|
+    |acceptColor cancelColor compareColor order|
 
     super initialize.
 
@@ -272,6 +272,8 @@
     cancelColor := Color red.
     compareColor := Color yellow.
 
+    order := UserPreferences current acceptCancelBarOrder.
+    
     acceptButton := ButtonWithHelpText new.
     acceptButton origin:0.0 @ 0.0 corner:1.0@0.7.
     acceptButton backgroundColor:acceptColor.
@@ -281,7 +283,11 @@
     self add:acceptButton.
 
     cancelButton := ButtonWithHelpText new.
-    cancelButton origin:0.0 @ 0.7 corner:1.0@0.9.
+    order == #acceptCompareCancel ifTrue:[
+        cancelButton origin:0.0 @ 0.9 corner:1.0@1.0.
+    ] ifFalse:[
+        cancelButton origin:0.0 @ 0.7 corner:1.0@0.9.
+    ].
     cancelButton backgroundColor:cancelColor.
     cancelButton enteredBackgroundColor:cancelColor lightened.
     cancelButton activeBackgroundColor:cancelColor darkened.
@@ -289,7 +295,11 @@
     self add:cancelButton.
 
     compareButton := ButtonWithHelpText new.
-    compareButton origin:0.0 @ 0.9 corner:1.0@1.0.
+    order == #acceptCompareCancel ifTrue:[
+        compareButton origin:0.0 @ 0.7 corner:1.0@0.9.
+    ] ifFalse:[
+        compareButton origin:0.0 @ 0.9 corner:1.0@1.0.
+    ].
     compareButton backgroundColor:compareColor.
     compareButton enteredBackgroundColor:compareColor lightened lightened.
     compareButton activeBackgroundColor:compareColor darkened.