r9049: remove redundant statement

diff --git a/sql.lisp b/sql.lisp
index 39f82dc2767ad65a8146428341df8ee638662725..d3132ab191e0882c3dc6f9ba048e2dda0122ccee 100644 (file)
--- a/sql.lisp
+++ b/sql.lisp
@@ -35,8 +35,6 @@
 (defun umls-sql-db! (db)
   (setq *umls-sql-db* db))
 
-(umls-sql-db! :2003AC)
-
 (defvar *umls-sql-user* "secret")
 (defun umls-sql-user ()
   *umls-sql-user*)