@@ -1367,7 +1367,7 @@ for {set i 0} {$i<$nrecs} {incr i} {
1367
1367
set posx 10
1368
1368
for {set j 0} {$j <$colcount } {incr j} {
1369
1369
set fldtext [lindex $curtup [expr $j +$shift ]]
1370
- if {$fldtext == " " } {set fldtext" " };
1370
+ if {[ string length $fldtext ]==0 } {set fldtext" " };
1371
1371
.mw.c create text$posx [expr 30+$i *14] -text$fldtext -tags [subst {$tagoid c$j rows}] -anchor w -font$tvfont
1372
1372
incr posx [expr [lindex $colwidth $j ]+2]
1373
1373
}
@@ -2327,7 +2327,7 @@ Window hide .qb} \
2327
2327
ql_draw_lizzard
2328
2328
focus .ql.entt}\
2329
2329
-font -Adobe-Helvetica-Medium-R-Normal-*-*-120-*-*-*-*-* -padx 9\
2330
- -pady 3 -text {Query lizzard :-) }
2330
+ -pady 3 -text {Visual designer }
2331
2331
# ##################
2332
2332
# SETTING GEOMETRY
2333
2333
# ##################
@@ -2367,7 +2367,7 @@ proc vTclWindow.ql {base} {
2367
2367
wm minsize$base 1 1
2368
2368
wm overrideredirect$base 0
2369
2369
wm resizable$base 1 1
2370
- wm title$base " Query lizzard "
2370
+ wm title$base " Visual query designer "
2371
2371
bind$base <B1-Motion> {
2372
2372
ql_pan %x %y
2373
2373
}
@@ -2620,4 +2620,3 @@ Window show .
2620
2620
Window show .dw
2621
2621
2622
2622
main$argc $argv
2623
-