URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [start/] [insight/] [tix/] [tools/] [icon.tcl] - Blame information for rev 1778

Go to most recent revision | Details | Compare with Previous | View Log


wm geometry . +200+100
 
if [tixMwm ismwmrunning .] {
    tixMwm decoration . -border 0 -menu 0 -minimize 0 -resizeh 0 -title 0 \
        -maximize 0
}
 
set tk_strictMotif 1
frame .f -bd 3 -bg lightgray -relief raised
button .b -bd 1 -highlightthickness 0 -bg gray80 -fg #a04040 -relief sunken \
    -font -*-helvetica-bold-r-*-*-18-*-*-*-*-*-*-* -anchor s
 
.b config -text "Advantages of Tix"
. config -bg gray40
pack .f -padx 1 -pady 1
pack .b -in .f -padx 0 -pady 0
 

Line No.	Rev	Author	Line
1	578	markom	`wm geometry . +200+100`
2
3			`if [tixMwm ismwmrunning .] {`
4			`tixMwm decoration . -border 0 -menu 0 -minimize 0 -resizeh 0 -title 0 \`
5			`-maximize 0`
6			`}`
7
8			`set tk_strictMotif 1`
9			`frame .f -bd 3 -bg lightgray -relief raised`
10			`button .b -bd 1 -highlightthickness 0 -bg gray80 -fg #a04040 -relief sunken \`
11			`-font --helvetica-bold-r---18------- -anchor s`
12
13			`.b config -text "Advantages of Tix"`
14			`. config -bg gray40`
15			`pack .f -padx 1 -pady 1`
16			`pack .b -in .f -padx 0 -pady 0`
17

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [tags/] [start/] [insight/] [tix/] [tools/] [icon.tcl] - Blame information for rev 1778