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.
new resource naming
authorClaus Gittinger <cg@exept.de>
Tue, 28 Oct 1997 21:02:59 +0100
changeset 1365 aa6a855b5013
parent 1364 6610f90eea47
child 1366 652634d99bfe
new resource naming
InfoBox.st file | annotate | diff | comparison | revisions
WarnBox.st file | annotate | diff | comparison | revisions
WarningBox.st file | annotate | diff | comparison | revisions
YesNoBox.st file | annotate | diff | comparison | revisions 
--- a/InfoBox.st	Tue Oct 28 21:02:12 1997 +0100
+++ b/InfoBox.st	Tue Oct 28 21:02:59 1997 +0100
@@ -193,16 +193,16 @@
      This is the default image; you can overwrite this in a concrete
      instance with the #image: message"
 
-    <resource: #style (#infoBoxIcon #infoBoxIconFile)>
+    <resource: #style (#'infoBox.icon' #'infoBox.iconFile')>
 
     |img imgFileName|
 
     InfoBitmap isNil ifTrue:[
-        img := StyleSheet at:'infoBoxIcon'.
+        img := StyleSheet at:'infoBox.icon'.
         img notNil ifTrue:[
             InfoBitmap := img
         ] ifFalse:[
-            imgFileName := StyleSheet at:'infoBoxIconFile' default:'bitmaps/Information.xbm'.
+            imgFileName := StyleSheet at:'infoBox.iconFile' default:'bitmaps/Information.xbm'.
             InfoBitmap := Image fromFile:imgFileName.
         ].
         InfoBitmap notNil ifTrue:[
@@ -211,7 +211,7 @@
     ].
     ^ InfoBitmap
 
-    "Modified: 1.4.1997 / 14:44:12 / cg"
+    "Modified: / 26.10.1997 / 17:02:51 / cg"
 ! !
 
 !InfoBox class methodsFor:'styles'!
@@ -369,5 +369,5 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.32 1997-04-01 12:54:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.33 1997-10-28 20:02:34 cg Exp $'
 ! !
--- a/WarnBox.st	Tue Oct 28 21:02:12 1997 +0100
+++ b/WarnBox.st	Tue Oct 28 21:02:59 1997 +0100
@@ -138,16 +138,16 @@
      This is the default image; you can overwrite this in a concrete
      instance with the image: message"
 
-    <resource: #style (#warningBoxIcon #warningBoxIconFile)>
+    <resource: #style (#'warningBox.icon' #'warningBox.iconFile')>
 
     |img imgFileName|
 
     WarnBitmap isNil ifTrue:[
-        img := StyleSheet at:'warningBoxIcon'.
+        img := StyleSheet at:'warningBox.icon'.
         img notNil ifTrue:[
             WarnBitmap := img
         ] ifFalse:[
-            imgFileName := StyleSheet at:'warningBoxIconFile' default:'bitmaps/Warning.xbm'.
+            imgFileName := StyleSheet at:'warningBox.iconFile' default:'bitmaps/Warning.xbm'.
             WarnBitmap := Image fromFile:imgFileName.
         ].
         WarnBitmap notNil ifTrue:[
@@ -173,8 +173,8 @@
      box showAtPointer.
     "
 
-    "Created: 17.11.1995 / 18:16:47 / cg"
-    "Modified: 1.4.1997 / 14:28:07 / cg"
+    "Created: / 17.11.1995 / 18:16:47 / cg"
+    "Modified: / 26.10.1997 / 17:05:55 / cg"
 ! !
 
 !WarningBox class methodsFor:'styles'!
@@ -213,5 +213,5 @@
 !WarningBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/WarnBox.st,v 1.21 1997-04-01 12:54:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/WarnBox.st,v 1.22 1997-10-28 20:02:49 cg Exp $'
 ! !
--- a/WarningBox.st	Tue Oct 28 21:02:12 1997 +0100
+++ b/WarningBox.st	Tue Oct 28 21:02:59 1997 +0100
@@ -138,16 +138,16 @@
      This is the default image; you can overwrite this in a concrete
      instance with the image: message"
 
-    <resource: #style (#warningBoxIcon #warningBoxIconFile)>
+    <resource: #style (#'warningBox.icon' #'warningBox.iconFile')>
 
     |img imgFileName|
 
     WarnBitmap isNil ifTrue:[
-        img := StyleSheet at:'warningBoxIcon'.
+        img := StyleSheet at:'warningBox.icon'.
         img notNil ifTrue:[
             WarnBitmap := img
         ] ifFalse:[
-            imgFileName := StyleSheet at:'warningBoxIconFile' default:'bitmaps/Warning.xbm'.
+            imgFileName := StyleSheet at:'warningBox.iconFile' default:'bitmaps/Warning.xbm'.
             WarnBitmap := Image fromFile:imgFileName.
         ].
         WarnBitmap notNil ifTrue:[
@@ -173,8 +173,8 @@
      box showAtPointer.
     "
 
-    "Created: 17.11.1995 / 18:16:47 / cg"
-    "Modified: 1.4.1997 / 14:28:07 / cg"
+    "Created: / 17.11.1995 / 18:16:47 / cg"
+    "Modified: / 26.10.1997 / 17:05:55 / cg"
 ! !
 
 !WarningBox class methodsFor:'styles'!
@@ -213,5 +213,5 @@
 !WarningBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.21 1997-04-01 12:54:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.22 1997-10-28 20:02:49 cg Exp $'
 ! !
--- a/YesNoBox.st	Tue Oct 28 21:02:12 1997 +0100
+++ b/YesNoBox.st	Tue Oct 28 21:02:59 1997 +0100
@@ -166,16 +166,16 @@
      This is the default image; you can overwrite this in a concrete
      instance with the #image: message."
 
-    <resource: #style (#requestBoxIcon #requestBoxIconFile)>
+    <resource: #style (#'requestBox.icon' #'requestBox.iconFile')>
 
     |img imgFileName|
 
     RequestBitmap isNil ifTrue:[
-        img := StyleSheet at:'requestBoxIcon'.
+        img := StyleSheet at:'requestBox.icon'.
         img notNil ifTrue:[
             RequestBitmap := img
         ] ifFalse:[
-            imgFileName := StyleSheet at:'requestBoxIconFile' default:'bitmaps/Request.xbm'.
+            imgFileName := StyleSheet at:'requestBox.iconFile' default:'bitmaps/Request.xbm'.
             RequestBitmap := Image fromFile:imgFileName.
         ].
         RequestBitmap notNil ifTrue:[
@@ -184,8 +184,8 @@
     ].
     ^ RequestBitmap
 
-    "Created: 17.11.1995 / 18:16:47 / cg"
-    "Modified: 11.4.1997 / 21:05:36 / cg"
+    "Created: / 17.11.1995 / 18:16:47 / cg"
+    "Modified: / 26.10.1997 / 17:06:19 / cg"
 ! !
 
 !YesNoBox class methodsFor:'styles'!
@@ -422,5 +422,5 @@
 !YesNoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.38 1997-04-11 19:32:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.39 1997-10-28 20:02:59 cg Exp $'
 ! !
hg/stx-libwidg