--- a/SettingsDialog.st	Mon Feb 14 18:16:43 2011 +0100
+++ b/SettingsDialog.st	Mon Feb 14 20:10:20 2011 +0100
@@ -672,11 +672,13 @@
 
     class := Smalltalk classNamed:aClass.
     class isNil ifTrue:[
-        ('SettingsDialog [warning]:cant find ', aClass asString, ' for register') infoPrintCR.
+        ('SettingsDialog [warning]: can''t find ', aClass asString, ' to register') infoPrintCR.
         ^ nil
     ].
     class autoload.
     ^ self createItemForApplication:anApplication class:aClass label:aLabel icon:class defaultIcon expandParent:aBoolean replaceExisting:false
+
+    "Modified: / 14-02-2011 / 20:10:11 / cg"
 !
 
 addApplClass:aClass withName:aName
@@ -711,7 +713,7 @@
     locIcon := icon.
     locClass := Smalltalk classNamed:aClass.
     locClass isNil ifTrue:[
-        ('SettingsDialog [warning]:cant find ', aClass asString, ' for register') infoPrintCR.
+        ('SettingsDialog [warning]: can''t find ', aClass asString, ' to register') infoPrintCR.
         ^ nil
     ].
     locClass autoload.
@@ -726,6 +728,8 @@
         icon:locIcon 
         expandParent:doExpand 
         replaceExisting:false
+
+    "Modified: / 14-02-2011 / 20:10:04 / cg"
 !
 
 addIcon:aIcon forCategory:aCategoryName
@@ -1460,11 +1464,11 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.90 2010-10-29 10:00:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.91 2011-02-14 19:10:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.90 2010-10-29 10:00:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.91 2011-02-14 19:10:20 cg Exp $'
 ! !
 
 SettingsDialog initialize!