diff options
Diffstat (limited to 'src/bin/pgaccess/lib/forms.tcl')
-rw-r--r-- | src/bin/pgaccess/lib/forms.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/bin/pgaccess/lib/forms.tcl b/src/bin/pgaccess/lib/forms.tcl index de4761e9f67..c0f5938e53e 100644 --- a/src/bin/pgaccess/lib/forms.tcl +++ b/src/bin/pgaccess/lib/forms.tcl @@ -803,6 +803,7 @@ switch $PgAcVar(fdobj,$item,class) { set DataControlVar($base.$name,recno) 0 set DataControlVar($base.$name,nrecs) \[pg_result \$res -numTuples\] setCursor NORMAL + pg_result \$res -clear }" namespace eval ::DataControl($base.$name) "proc setSQL {sqlcmd} { global DataControlVar |