equal
deleted
inserted
replaced
1 ; |
1 ; |
2 ; common motif stuff (not a style, but included by all motif style variations) |
2 ; common motif stuff (not a style, but included by all motif style variations) |
3 ; |
3 ; |
4 ; |
4 ; |
5 ; $Header: /cvs/stx/stx/libview/styles/motif.common,v 1.31 2000-09-01 16:18:22 cg Exp $ |
5 ; $Header: /cvs/stx/stx/libview/styles/motif.common,v 1.32 2001-11-16 14:28:54 cg Exp $ |
6 |
6 |
7 ; |
7 ; |
8 ; this is to be included from the real style, |
8 ; this is to be included from the real style, |
9 ; with (at least) viewGrey, shadowColor, lightColor and mediumColor |
9 ; with (at least) viewGrey, shadowColor, lightColor and mediumColor |
10 ; being predefined |
10 ; being predefined |
149 |
149 |
150 infoBox.separator true |
150 infoBox.separator true |
151 infoBox.iconFile 'bitmaps/Information_motif.xbm' |
151 infoBox.iconFile 'bitmaps/Information_motif.xbm' |
152 warningBox.iconFile 'bitmaps/Warning_motif.xbm' |
152 warningBox.iconFile 'bitmaps/Warning_motif.xbm' |
153 requestBox.iconFile 'bitmaps/Request_motif.xbm' |
153 requestBox.iconFile 'bitmaps/Request_motif.xbm' |
|
154 errorBox.iconFile 'bitmaps/Error_motif.xbm' |
154 |
155 |
155 |
156 |
156 #if Screen current isNil or:[Screen current hasGrayscales] |
157 #if Screen current isNil or:[Screen current hasGrayscales] |
157 arrowButton.upForm Image extent:11@12 \ |
158 arrowButton.upForm Image extent:11@12 \ |
158 depth:2 \ |
159 depth:2 \ |