--- a/NewChangesBrowser.st Fri Apr 17 00:07:16 1998 +0200
+++ b/NewChangesBrowser.st Fri Apr 17 01:03:20 1998 +0200
@@ -1054,7 +1054,7 @@
categoryColumn
"returns whether the column for the category attribute of the changes is shown"
- ^CategoryColumn ? (CategoryColumn := true)
+ ^CategoryColumn ? (CategoryColumn := false)
!
categoryColumn: aBoolean
@@ -1079,7 +1079,7 @@
positionColumn
"returns whether the column for the position attribute of the changes is shown"
- ^PositionColumn ? (PositionColumn := true)
+ ^PositionColumn ? (PositionColumn := false)
!
positionColumn: aBoolean
@@ -1499,8 +1499,8 @@
self listOfChangeColumns contents: (self listOfChangeColumns remove:
(self listOfChangeColumns detect: [:column| column label = aColumnLabel] ifNone: nil) ifAbsent: [self listOfChangeColumns]; yourself)
asArray
- ]
-
+ ].
+ self autoSelectLast
!
@@ -3210,6 +3210,6 @@
!NewChangesBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.2 1998-04-14 19:14:54 tz Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.3 1998-04-16 23:03:20 tz Exp $'
! !