Update to version 0.51.

Author: bmomjian

src/bin/pgaccess/README

@@ -23,7 +23,7 @@ PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
 
 
 
-PGACCESS 0.5 , 3 October 1997
+PGACCESS 0.51 , 3 October 1997
 ================================
 I dedicate this program to my little 4 year daughter Ana-Maria and my wife
 for their understanding. I hope they will forgive me for spending so many

src/bin/pgaccess/pgaccess.tcl

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