AbstractLauncherApplication.st
changeset 3032 709d71418e15
parent 3031 4f31ae099eb6
child 3035 55824593b14c
--- a/AbstractLauncherApplication.st	Fri Jun 22 10:42:38 2001 +0200
+++ b/AbstractLauncherApplication.st	Fri Jun 22 10:50:26 2001 +0200
@@ -3790,6 +3790,11 @@
     s nextPutLine:'EditTextView st80Mode: ' , (EditTextView st80Mode storeString) , '.'.
     s nextPutLine:'TextView st80SelectMode: ' , (TextView st80SelectMode storeString) , '.'.
     s nextPutLine:'UserPreferences current syntaxColoring: ' , (currentUserPrefs syntaxColoring storeString) , '.'.
+    (ListView userDefaultTabPositions = ListView tab4Positions) ifTrue:[
+        s nextPutLine:'ListView userDefaultTabPositions:(ListView tab4Positions).'.
+    ] ifFalse:[
+        s nextPutLine:'ListView userDefaultTabPositions:(ListView tab8Positions).'.
+    ].
 
     s nextPutLine:'"/'.
     s nextPutLine:'"/ User preference values:'.
@@ -6412,5 +6417,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.147 2001-06-22 08:42:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.148 2001-06-22 08:50:26 cg Exp $'
 ! !