changed: #setupTabSpec
authorClaus Gittinger <cg@exept.de>
Sat, 10 Jul 2010 11:00:36 +0200
changeset 9515 04cc002afd3c
parent 9514 c818ca8969f7
child 9516 a472b6e9b28e
changed: #setupTabSpec
ChangesBrowser.st
--- a/ChangesBrowser.st	Fri Jul 09 20:03:41 2010 +0200
+++ b/ChangesBrowser.st	Sat Jul 10 11:00:36 2010 +0200
@@ -1435,13 +1435,15 @@
 
 setupTabSpec
     autoCompare value ifTrue:[
-	tabSpec positions:#(0  0.15  5   8.5 ).
+        tabSpec positions:#(0  0.15  7   9.5 ).
     ] ifFalse:[
-	"/
-	"/ set tabs to hide compare-column
-	"/
-	tabSpec positions:#(-1  0    5   8.5 ).
+        "/
+        "/ set tabs to hide compare-column
+        "/
+        tabSpec positions:#(-1  0    7   9.5 ).
     ]
+
+    "Modified: / 10-07-2010 / 10:59:49 / cg"
 !
 
 update:what with:aParameter from:changedObject
@@ -6118,7 +6120,7 @@
     changeIsFollowupMethodChange := OrderedCollection new.
 
     excla := inStream class chunkSeparator.
-    maxLen := 60.
+    maxLen := 100.
 
     [inStream atEnd] whileFalse:[
         "
@@ -6134,16 +6136,16 @@
         ]
     ].
 
-    "Modified: / 27.8.1995 / 23:06:55 / claus"
-    "Modified: / 9.11.2001 / 02:24:46 / cg"
+    "Modified: / 27-08-1995 / 23:06:55 / claus"
+    "Modified: / 10-07-2010 / 10:58:08 / cg"
 ! !
 
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.400 2009-11-08 16:37:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.401 2010-07-10 09:00:36 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.400 2009-11-08 16:37:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.401 2010-07-10 09:00:36 cg Exp $'
 ! !