From 0b65e1436e9ba9b9370b3caeeee550dc69c06a21 Mon Sep 17 00:00:00 2001
From: Bruce Momjian <bruce@momjian.us>
Date: Wed, 26 Apr 2000 17:51:03 +0000
Subject: [PATCH] Add res clear to example

---
 src/bin/pgtclsh/pgtclUtils.tcl                      | 1 +
 src/interfaces/jdbc/org/postgresql/DriverClass.java | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/bin/pgtclsh/pgtclUtils.tcl b/src/bin/pgtclsh/pgtclUtils.tcl
index dff87a484f..e09e8b2b3a 100644
--- a/src/bin/pgtclsh/pgtclUtils.tcl
+++ b/src/bin/pgtclsh/pgtclUtils.tcl
@@ -10,6 +10,7 @@ proc getDBs { {host "localhost"} {port "5432"} } {
     for {set i 0} {$i < $ntups} {incr i} {
 	lappend datnames [pg_result $res -getTuple $i]
     }
+    pg_result $res -clear
     pg_disconnect $conn
     return $datnames
 }
diff --git a/src/interfaces/jdbc/org/postgresql/DriverClass.java b/src/interfaces/jdbc/org/postgresql/DriverClass.java
index 873cdba6c0..02bb6b7235 100644
--- a/src/interfaces/jdbc/org/postgresql/DriverClass.java
+++ b/src/interfaces/jdbc/org/postgresql/DriverClass.java
@@ -1,4 +1,4 @@
 package org.postgresql;
 public class DriverClass {
-public static String connectClass="org.postgresql.jdbc2.Connection";
+public static String connectClass="org.postgresql.jdbc1.Connection";
 }