--- a/MCRepositoryBrowser.st	Wed Sep 07 15:52:52 2011 +0200
+++ b/MCRepositoryBrowser.st	Wed Sep 07 15:55:30 2011 +0200
@@ -4,7 +4,8 @@
 	instanceVariableNames:'repositoriesHolder packagesHolder versionsHolder
 		selectedVersionHolder worker selectedVersionDetailsHolder
 		selectedRepositoryHolder targetPackage targetNamespace
-		lastPackage targetPackageHolder targetNamespaceNameHolder'
+		lastPackage targetPackageHolder targetNamespaceNameHolder
+		updateChangefileHolder'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Monticello-St/X UI'
@@ -298,6 +299,14 @@
             itemValue: setTargetNamespace
             translateLabel: true
           )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
+            label: 'Update Changefile'
+            translateLabel: true
+            indication: updateChangefileHolder
+          )
          )
         nil
         nil
@@ -716,6 +725,15 @@
     ^ targetPackageHolder.
 !
 
+updateChangefileHolder
+    updateChangefileHolder isNil ifTrue:[
+        updateChangefileHolder := false asValue.
+    ].
+    ^ updateChangefileHolder
+
+    "Created: / 07-09-2011 / 15:54:03 / cg"
+!
+
 versionsHolder
     "return/create the 'versionsHolder' value holder (automatically generated)"
 
@@ -925,7 +943,13 @@
                     answer: package   
                     do: [
                         MCInteractiveLoadingQuery answer: true do:[
-                            version load
+                            updateChangefileHolder value ifTrue:[
+                                version load
+                            ] ifFalse:[
+                                Class withoutUpdatingChangesDo:[
+                                    version load
+                                ]
+                            ].
                         ]
                     ].
             ].
@@ -933,7 +957,7 @@
 
     "Created: / 09-11-2010 / 13:25:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 06-03-2011 / 20:44:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 07-09-2011 / 12:50:06 / cg"
+    "Modified: / 07-09-2011 / 15:55:18 / cg"
 !
 
 versionLoadIntoPackage
@@ -979,11 +1003,11 @@
 !MCRepositoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.11 2011-09-07 13:15:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.12 2011-09-07 13:55:30 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.11 2011-09-07 13:15:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.12 2011-09-07 13:55:30 cg Exp $'
 !
 
 version_SVN