*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 10 Oct 2009 13:36:28 +0200
changeset 1070 d3525fab5c67
parent 1069 52d47c503c30
child 1071 49768bd427dd
*** empty log message ***
Welcome.wsp
bc.mak
keyboardMacros.rc
--- a/Welcome.wsp	Wed Oct 07 11:44:31 2009 +0200
+++ b/Welcome.wsp	Sat Oct 10 13:36:28 2009 +0200
@@ -8,8 +8,9 @@
     some default keyboard settings changed (F2 vs. CTRL-space)
     many bug fixes and minor enhancements.
     Magritte framework included
-    Merged Jan Vrany's changes. You should now be able to load SmallRuby
-    directly into the distributed image.
+    Merged Jan Vrany's changes. Can now load SmallRuby directly into the distributed st/x.
+    rdoit (goodies) compiles with bcc32 (WIN32)
+    inspector: new menu item: 'show widget hierarchy' (if a view is selected in the field-list)
 
 Whats new in 5.4.4 ?
     oldSpace limit increased (512Mb)
--- a/bc.mak	Wed Oct 07 11:44:31 2009 +0200
+++ b/bc.mak	Sat Oct 10 13:36:28 2009 +0200
@@ -104,8 +104,8 @@
 	copy $(TOP)\libbasic2\objvc\libstx_libbasic2.dll *.*
 	copy $(TOP)\libbasic3\objvc\libstx_libbasic3.dll *.*
 	copy $(TOP)\libcomp\objvc\libstx_libcomp.dll *.*
-	copy $(TOP)\libview\objvc\libstx_libview.dll *.*
-	copy $(TOP)\libview2\objvc\libstx_libview2.dll *.*
+#        copy $(TOP)\libview\objvc\libstx_libview.dll *.*
+#        copy $(TOP)\libview2\objvc\libstx_libview2.dll *.*
 	copy $(TOP)\libwidg\objvc\libstx_libwidg.dll *.*
 	copy $(TOP)\libwidg2\objvc\libstx_libwidg2.dll *.*
 	copy $(TOP)\libtool\objvc\libstx_libtool.dll *.*
--- a/keyboardMacros.rc	Wed Oct 07 11:44:31 2009 +0200
+++ b/keyboardMacros.rc	Sat Oct 10 13:36:28 2009 +0200
@@ -402,34 +402,30 @@
 			col2 := (self listAt:lineNr) size.
 		    ].
 		    isAllLower := isAllUpper := isUpperFirst := true.
-		    col1 = col2 ifTrue:[
-			isAllLower := (line at:col1) isLowercase.
-			isAllUpper := isUpperFirst := isAllLower not.
-		    ] ifFalse:[
-			col1 to:col2 do:[:col |
-			    |ch|
+		    col1 to:col2 do:[:col |
+			|ch|
 
-			    ch := line at:col.
-			    ch isUppercase ifTrue:[
-				isAllLower := false.
-				col ~~ col1 ifTrue:[
-				    isUpperFirst := false.
+			ch := line at:col.
+			ch isUppercase ifTrue:[
+			    isAllLower := false.
+			    col ~~ col1 ifTrue:[
+				isUpperFirst := false.
+			    ].
+			] ifFalse:[
+			    ch isLowercase ifTrue:[
+				isUpperFirst := false.
+				isAllUpper := false.
+				col == col1 ifTrue:[
+				    "/ isUpperFirst := false.
 				].
-			    ] ifFalse:[
-				ch isLowercase ifTrue:[
-				    isAllUpper := false.
-				    col == col1 ifTrue:[
-					isUpperFirst := false.
-				    ].
-				]
-			    ].
+			    ]
 			].
 		    ].
 		    makeLowercase := makeUppercase := makeUppercaseFirst := false.
 		    isAllLower ifTrue:[
 			makeUppercase := true.
 		    ] ifFalse:[
-			(isAllUpper and:[col1 ~= col2]) ifTrue:[
+			isAllUpper ifTrue:[
 			    makeUppercaseFirst := true.
 			] ifFalse:[
 			    makeLowercase := true.