diff options
| author | James Bursa <james@netsurf-browser.org> | 2002-06-18 21:24:21 +0000 |
|---|---|---|
| committer | James Bursa <james@netsurf-browser.org> | 2002-06-18 21:24:21 +0000 |
| commit | 74ef206f532445a03a9463d4c0a5e0715e9808b4 (patch) | |
| tree | e66380bb885014983388486e62785321a02d65de /render/show.tcl | |
| parent | ce0d001eb13221644242270985975e967a32b297 (diff) | |
| download | netsurf-74ef206f532445a03a9463d4c0a5e0715e9808b4.tar.gz netsurf-74ef206f532445a03a9463d4c0a5e0715e9808b4.tar.bz2 | |
[project @ 2002-06-18 21:24:21 by bursa]
Improved inline and float layout, new CSS properties, better debug output.
svn path=/import/netsurf/; revision=20
Diffstat (limited to 'render/show.tcl')
| -rw-r--r-- | render/show.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/render/show.tcl b/render/show.tcl index 4adc48287..2688c6cc8 100644 --- a/render/show.tcl +++ b/render/show.tcl @@ -10,7 +10,7 @@ proc rect {x y w h n t c} { set y [expr $y+8] .can create rectangle $x $y [expr $x+$w] [expr $y+$h] -fill $c .can create text $x $y -anchor nw -text $n -fill red -font "arial 18 bold" - .can create text $x [expr $y+$h] -anchor sw -text $t -font "courier 32" + .can create text $x [expr $y+$h] -anchor sw -text $t -font "courier 12" } while {-1 != [gets stdin line]} { |