X-Git-Url: http://git.kpe.io/?p=umlisp.git;a=blobdiff_plain;f=sql.lisp;h=97874c7b77c294df986e8053b6329a5a7638315b;hp=452237e64eff460ebe15c665239e775d3f9fa21f;hb=HEAD;hpb=40f76eee2ed8631efb0131ec2b52357c206f6dff diff --git a/sql.lisp b/sql.lisp index 452237e..97874c7 100644 --- a/sql.lisp +++ b/sql.lisp @@ -54,7 +54,7 @@ (sql-disconnect-pooled) (setq *umls-sql-passwd* p)) -(defvar *umls-sql-host* "sql1.med-info.com") +(defvar *umls-sql-host* "mysql.med-info.com") (defun umls-sql-host () *umls-sql-host*) (defun set-umls-sql-host (h)