--- a/Tools__ChangeSetBrowser2.st Fri Mar 30 14:35:31 2012 +0100
+++ b/Tools__ChangeSetBrowser2.st Sat Mar 31 01:16:30 2012 +0100
@@ -2590,10 +2590,13 @@
!
doOpenFile: aStringOrFilename
- | cs |
-
- self showProgress: 'Reading ' , aStringOrFilename asFilename baseName while:[
+ | cs fn |
+
+ self showProgress: 'Reading ' , (fn := aStringOrFilename asFilename) baseName while:[
cs := ChangeSet fromFile: aStringOrFilename.
+ (fn suffix = 'chg') ifTrue:[
+ self list scrollToBottom: true.
+ ].
self doOpen: cs.
].
@@ -2641,6 +2644,15 @@
"Modified: / 20-03-2012 / 13:52:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
+doScrollToBottom
+
+ | changeList |
+ changeList := self list.
+ changeList selection: { changeList list last }
+
+ "Created: / 30-03-2012 / 16:56:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
setTargetNamespace
"specify an st/x namespace to be used as default"
@@ -3578,7 +3590,7 @@
!ChangeSetBrowser2 class methodsFor:'documentation'!
version
- ^ '$Id: Tools__ChangeSetBrowser2.st 7960 2012-03-30 13:35:31Z vranyj1 $'
+ ^ '$Id: Tools__ChangeSetBrowser2.st 7961 2012-03-31 00:16:30Z vranyj1 $'
!
version_CVS
@@ -3586,5 +3598,5 @@
!
version_SVN
- ^ '$Id: Tools__ChangeSetBrowser2.st 7960 2012-03-30 13:35:31Z vranyj1 $'
+ ^ '$Id: Tools__ChangeSetBrowser2.st 7961 2012-03-31 00:16:30Z vranyj1 $'
! !