r7860: add new function, rename old function

[umlisp.git] / package.lisp

diff --git a/package.lisp b/package.lisp
index 963b29885c7e80111e8fcc3f8877d97694abb02d..1d01ccc199d3a08f1bc5762007bf8e3c36b8c10f 100644 (file)
--- a/package.lisp
+++ b/package.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: package.lisp,v 1.30 2003/08/02 07:03:00 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of UMLisp, is
 ;;;;    Copyright (c) 2000-2003 by Kevin M. Rosenberg, M.D.
@@ -52,6 +52,7 @@
    #:lat-abbr-info #:stt-abbr-info
    
    ;; From sql.lisp
+   #:*umls-sql-db*
    #:umls-sql-user!
    #:umls-sql-passwd!
    #:umls-sql-db!
@@ -80,6 +81,7 @@
    #:find-usty-cui
    #:find-usty-word
    #:find-urel-cui
+   #:find-cui2-urel-cui
    #:find-urel-cui2
    #:find-ucon-rel-cui2
    #:find-ucoc-cui
@@ -97,6 +99,7 @@
    #:find-ucon-cuisui
    #:find-ucon-str
    #:find-ucon-all
+   #:find-cui-ucon-all
    #:map-ucon-all
    #:find-uterm-cui
    #:find-uterm-lui