Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 09 Dec 1999 12:10:41 +0100
changeset 2073 40873b6d96bb
parent 2072 2308caaeb8f9
child 2074 24e9d7beed2b
*** empty log message ***
VariablePanel.st file | annotate | diff | comparison | revisions
WarningBox.st file | annotate | diff | comparison | revisions 
--- a/VariablePanel.st	Wed Dec 08 21:49:22 1999 +0100
+++ b/VariablePanel.st	Thu Dec 09 12:10:41 1999 +0100
@@ -562,8 +562,8 @@
         ] ifFalse:[
             device platformName = 'WIN32' ifFalse:[
                 cursor := Cursor 
-                            sourceForm:(Smalltalk bitmapFromFileNamed:'VVPanel.xbm' forClass:self)
-                            maskForm:(Smalltalk bitmapFromFileNamed:'VVPanel_m.xbm' forClass:self)
+                            sourceForm:(Smalltalk imageFromFileNamed:'VVPanel.xbm' forClass:self)
+                            maskForm:(Smalltalk imageFromFileNamed:'VVPanel_m.xbm' forClass:self)
                             hotX:8
                             hotY:8.
             ].
@@ -585,8 +585,8 @@
         ] ifFalse:[
             device platformName = 'WIN32' ifFalse:[
                 cursor := Cursor 
-                            sourceForm:(Smalltalk bitmapFromFileNamed:'VHPanel.xbm' forClass:self)
-                            maskForm:(Smalltalk bitmapFromFileNamed:'VHPanel_m.xbm' forClass:self)
+                            sourceForm:(Smalltalk imageFromFileNamed:'VHPanel.xbm' forClass:self)
+                            maskForm:(Smalltalk imageFromFileNamed:'VHPanel_m.xbm' forClass:self)
                             hotX:8
                             hotY:8.
             ].
@@ -1723,5 +1723,5 @@
 !VariablePanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.52 1999-12-01 20:38:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.53 1999-12-09 11:10:41 cg Exp $'
 ! !
--- a/WarningBox.st	Wed Dec 08 21:49:22 1999 +0100
+++ b/WarningBox.st	Thu Dec 09 12:10:41 1999 +0100
@@ -146,7 +146,7 @@
         img := StyleSheet at:'warningBox.icon'.
         img isNil ifTrue:[
             imgFileName := StyleSheet at:'warningBox.iconFile' default:'bitmaps/Warning.xbm'.
-            img := Smalltalk bitmapFromFileNamed:imgFileName forClass:self.
+            img := Smalltalk imageFromFileNamed:imgFileName forClass:self.
         ].
         img notNil ifTrue:[
             img := img onDevice:Display
@@ -208,5 +208,5 @@
 !WarningBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.26 1999-12-01 20:38:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.27 1999-12-09 11:10:21 cg Exp $'
 ! !
hg/stx-libwidg