changed:
authorClaus Gittinger <cg@exept.de>
Tue, 24 Jul 2012 16:00:20 +0200
changeset 567 bae15b0bb404
parent 566 2cdc9be3bc68
child 568 e8fa08d59973
changed: #hasUnsavedChanges #windowSpec
MCSettingsApp.st
--- a/MCSettingsApp.st	Mon Jul 23 11:39:09 2012 +0200
+++ b/MCSettingsApp.st	Tue Jul 24 16:00:20 2012 +0200
@@ -239,7 +239,7 @@
                    (SpecCollection
                       collection: (
                        (CheckBoxSpec
-                          label: 'Enable Monticello Manager'
+                          label: 'Show in Browser Menus'
                           name: 'Enabled'
                           model: mcEnabled
                           translateLabel: true
@@ -623,7 +623,11 @@
             hasChangedAspectIn: #(mcPrimaryRepository)
             asComparedTo:currentUserPrefs) ifTrue:[^ true].
     ] ifFalse:[
-        self mcRepositories value notNil ifTrue:[^ true]
+        self mcRepositories value notNil ifTrue:[
+            self mcRepositories value ~= MCRepositoryGroup default repositories ifTrue:[
+                ^ true
+            ]
+        ]
     ].
     ^ self
         hasChangedAspectIn: #(mcEnabled)
@@ -631,18 +635,18 @@
 
     "Created: / 28-05-2008 / 07:33:26 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 19-08-2009 / 12:07:01 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 01-12-2011 / 20:27:34 / cg"
     "Modified: / 04-04-2012 / 11:12:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 24-07-2012 / 15:50:53 / cg"
 ! !
 
 !MCSettingsApp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCSettingsApp.st,v 1.10 2012-04-04 10:32:31 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCSettingsApp.st,v 1.11 2012-07-24 14:00:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCSettingsApp.st,v 1.10 2012-04-04 10:32:31 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCSettingsApp.st,v 1.11 2012-07-24 14:00:20 cg Exp $'
 !
 
 version_SVN