? pgaccess
Index: lib/mainlib.tcl
===================================================================
RCS file: /home/projects/pgsql/cvsroot/pgsql/src/bin/pgaccess/lib/mainlib.tcl,v
retrieving revision 1.7
diff -c -r1.7 mainlib.tcl
*** lib/mainlib.tcl	2001/02/07 21:30:12	1.7
--- lib/mainlib.tcl	2001/05/30 16:50:15
***************
*** 109,115 ****
  	set maxim 16384
  	setCursor CLOCK
  	catch {
! 		wpg_select $CurrentDB "select oid from pg_database where datname='template1'" rec {
  			set maxim $rec(oid)
  		}
  	}
--- 109,115 ----
  	set maxim 16384
  	setCursor CLOCK
  	catch {
! 		wpg_select $CurrentDB "select datlastsysoid from pg_database where datname='" $PgAcVar(opendb,dbname) "'" rec {
  			set maxim $rec(oid)
  		}
  	}