--- a/OptionBox.st	Thu Aug 24 17:01:58 2017 +0200
+++ b/OptionBox.st	Thu Aug 24 17:57:12 2017 +0200
@@ -180,7 +180,7 @@
 
 request:title buttonLabels:labels values:values
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled"
+     the corresponding values collection. Return nil if canceled"
 
     ^ self
         request:title
@@ -196,11 +196,12 @@
     "
 
     "Modified: / 08-02-2011 / 11:22:13 / cg"
+    "Modified (comment): / 24-08-2017 / 15:03:02 / cg"
 !
 
 request:title buttonLabels:labels values:values default:defaultValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled."
+     the corresponding values collection. Return nil if canceled."
 
     ^ self
         request:title label:title image:(YesNoBox iconBitmap) buttonLabels:labels values:values
@@ -213,11 +214,13 @@
         values:#(1 2 3)
         default:3
     "
+
+    "Modified (comment): / 24-08-2017 / 15:03:07 / cg"
 !
 
 request:title label:label buttonLabels:labels values:values
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled"
+     the corresponding values collection. Return nil if canceled"
 
     ^ self
         request:title
@@ -237,11 +240,12 @@
     "
 
     "Modified: / 08-02-2011 / 11:32:48 / cg"
+    "Modified (comment): / 24-08-2017 / 15:03:10 / cg"
 !
 
 request:title label:label buttonLabels:labels values:values default:defaultValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled"
+     the corresponding values collection. Return nil if canceled"
 
     ^ self
         request:title label:label image:(YesNoBox iconBitmap) buttonLabels:labels values:values
@@ -255,11 +259,13 @@
         values:#(1 2 3)
         default:3
     "
+
+    "Modified (comment): / 24-08-2017 / 15:03:15 / cg"
 !
 
 request:title label:label buttonLabels:labels values:values default:defaultValue onCancel:cancelValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return cancelValue if cancelled."
+     the corresponding values collection. Return cancelValue if canceled."
 
     ^ self
         request:title label:label image:(YesNoBox iconBitmap) buttonLabels:labels values:values
@@ -274,11 +280,13 @@
         default:3
         onCancel:2
     "
+
+    "Modified (comment): / 24-08-2017 / 15:03:18 / cg"
 !
 
 request:title label:label image:anImage buttonLabels:labels values:values
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil, if cancelled."
+     the corresponding values collection. Return nil, if canceled."
 
     ^ self
         request:title label:label image:anImage buttonLabels:labels values:values
@@ -292,11 +300,13 @@
         buttonLabels:#('one' 'two' 'three')
         values:#(1 2 3)
     "
+
+    "Modified (comment): / 24-08-2017 / 15:03:31 / cg"
 !
 
 request:title label:label image:anImage buttonLabels:labels values:values default:defaultValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled."
+     the corresponding values collection. Return nil if canceled."
 
     ^ self
         request:title label:label image:anImage buttonLabels:labels values:values
@@ -311,11 +321,13 @@
         values:#(1 2 3)
         default:3
     "
+
+    "Modified (comment): / 24-08-2017 / 15:03:34 / cg"
 !
 
 request:title label:label image:anImage buttonLabels:labels values:values default:defaultValue onCancel:cancelValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return cancelValue if cancelled."
+     the corresponding values collection. Return cancelValue if canceled."
 
     |box retVal|
 
@@ -344,7 +356,8 @@
         onCancel:nil
     "
 
-    "Modified: / 23.2.2000 / 11:59:32 / cg"
+    "Modified: / 23-02-2000 / 11:59:32 / cg"
+    "Modified (comment): / 24-08-2017 / 15:03:36 / cg"
 ! !
 
 !OptionBox class methodsFor:'obsolete'!
@@ -360,18 +373,20 @@
 
 request:title label:label form:aForm buttonLabels:labels values:values
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil, if cancelled."
+     the corresponding values collection. Return nil, if canceled."
 
     <resource:#obsolete>
 
     ^ self
         request:title label:label image:aForm buttonLabels:labels values:values
         default:nil onCancel:nil
+
+    "Modified (comment): / 24-08-2017 / 15:03:22 / cg"
 !
 
 request:title label:label form:aForm buttonLabels:labels values:values default:defaultValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return nil if cancelled."
+     the corresponding values collection. Return nil if canceled."
 
     <resource:#obsolete>
 
@@ -383,15 +398,19 @@
         values:values
         default:defaultValue
         onCancel:nil
+
+    "Modified (comment): / 24-08-2017 / 15:03:25 / cg"
 !
 
 request:title label:label form:aForm buttonLabels:labels values:values default:defaultValue onCancel:cancelValue
     "create a new optionBox, open it modal and return the value of
-     the corresponding values collection. Return cancelValue if cancelled."
+     the corresponding values collection. Return cancelValue if canceled."
 
     <resource:#obsolete>
 
     ^ self request:title label:label image:aForm buttonLabels:labels values:values default:defaultValue onCancel:cancelValue
+
+    "Modified (comment): / 24-08-2017 / 15:03:28 / cg"
 ! !
 
 !OptionBox methodsFor:'accessing'!