Export database open/close procedures to expanders.

diff --git a/v7/src/xdoc/xdoc.pkg b/v7/src/xdoc/xdoc.pkg
index 648b32c39ed1ea47132a8a4450226517e7055713..0cb15b2bf6bd704a81c4a70d4d3cd3e898aa2f06 100644 (file)
--- a/v7/src/xdoc/xdoc.pkg
+++ b/v7/src/xdoc/xdoc.pkg
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: xdoc.pkg,v 1.5 2004/11/24 20:56:35 cph Exp $
+$Id: xdoc.pkg,v 1.6 2005/11/03 19:29:18 cph Exp $
 
-Copyright 2004 Massachusetts Institute of Technology
+Copyright 2004,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -182,6 +182,8 @@ USA.
          db-save-output!
          db-set-persistent-value!)
   (export (runtime ssp-expander-environment)
+         close-database
+         database-connection
          db-change-user-password
          db-clear-late-flag
          db-clear-submitter
@@ -216,4 +218,5 @@ USA.
          db-user-administrator?
          db-user-enabled?
          db-user-real-name
-         db-valid-password?))
\ No newline at end of file
+         db-valid-password?
+         with-database-connection))
\ No newline at end of file